Advanced Search

Luca3544

10 Reputation

One Badge

7 years, 10 days
Contact Luca3544

MaplePrimes Activity


These are replies submitted by Luca3544

  ...

Luca3544 10
August 30 2019
0 0


 

M := proc (a) local Grundstof, b, c, d, q; description "Side 302, 303"; Grundstof := [1.0079*(g/mol)+"H", 4.0026*(g/mol)+"He", 6.941*(g/mol)+"Li", 9.0122*(g/mol)+"Be", g/mol, 10.811*(g/mol)+"B", 12.0107*(g/mol)+"C", 14.0067*(g/mol)+"N", 15.9994*(g/mol)+"O", 18.9984*(g/mol)+"F", 22.990*(g/mol)+"Na", 24.305*(g/mol)+"Mg"]; b := 1; c := convert(a, string); q := nops(Grundstof); for d to q do if has(Grundstof[b], c) = true then print(Grundstof[b]); b := b+1 else b := b+1 end if end do end proc

M(H)

13

 (1)

``


 

Download send.mw

@Christian Wolinski 

Page 1 of 1