Comme le titre l'indique, ce programme ser à trouver une formule brute d'un composé en connaissant sa densitée, sa composition centésimale et la masse molaire des composés.
Voici le code:
Code | ClrHome
Input "NBR D ELEMENTS:",A
Input "D:",F
Output(8,1,"M=
29F->M
Output(8,3,M
Pause
For(B,1,A
ClrHome
Output(1,1,"ELEMENT N°
Output(1,11,B
Disp "",""
Input "MM:",C
Input "CC",D
MD/100->E
Output(7,1,"MASSE=
Output(7,7,E
Output(8,1,"NBR D ATOME=
Fix 0
Output(8,13,E/C
Float
Pause
End
ClrHome
Output(1,1," " |
J'admet que l'on peut faire mieux donc je suis ouvert à vos remarques.
Sangohan38
|