calcoli chimici

program mole;
uses crt;

begin
clrscr;
writeln('massa atomica e molecolare relativa:numero puro');
writeln('massa atomica e molecolare assoluta,in grammi o u.m.a');
writeln('mole,grammoatomo,grammolecola:contengono N particelle');
writeln('numero di AVOGADRO : N ');
writeln;
writeln('premi invio');readln;clrscr;
writeln('X atomo o molecola');
writeln('GA grammoatomo...GM grammomolecola...mole');
writeln('mAR massa atomica relativa.......mMA massa atomica assoluta');
writeln('mMR massa molecolare relativa....mMA massa molecolare assoluta');
writeln('X':5,'mAR':10,'mAA':10,'mMR':10,'mMA':10,'mole':10,'GA':10,'GM':10);
writeln('H':5,'1':10,'1 uma':10,'   ':10,'   ':10,'1g':10,'1g':10,'  ':10);
writeln('O':5,'16':10,'16 uma':10,'   ':10,'   ':10,'16g':10,'16g':10,'  ':10);
writeln('S':5,'32':10,'32 uma':10,'   ':10,'   ':10,'32g':10,'32g':10,'  ':10);
writeln('Cl':5,'35':10,'35 uma':10,'   ':10,'   ':10,'35g':10,'35g':10,'  ':10);
writeln('N':5,'14':10,'14 uma':10,'   ':10,'   ':10,'14g':10,'14g':10,'  ':10);
writeln('Na':5,'23':10,'23 uma':10,'   ':10,'   ':10,'23g':10,'23g':10,'  ':10);
writeln('K':5,'39':10,'39 uma':10,'   ':10,'   ':10,'39g':10,'39g':10,'  ':10);
writeln('Ca':5,'40':10,'40 uma':10,'   ':10,'   ':10,'40g':10,'40g':10,'  ':10);
writeln;
writeln('H2O':5,' ':10,'  ':10,'18  ':10,'18 uma':10,'18g ':10,' ':10,'18g':10);
writeln('H2S':5,' ':10,'  ':10,'34  ':10,'34 uma':10,'34g ':10,' ':10,'34g':10);
writeln('HCl':5,' ':10,'  ':10,'36  ':10,'36 uma':10,'36g ':10,' ':10,'36g':10);
writeln('H2SO3':5,' ':10,'  ':10,'72  ':10,'72 uma':10,'72g ':10,' ':10,'72g':10);
writeln('HNO3':5,' ':10,'  ':10,'63  ':10,'63 uma':10,'63g ':10,' ':10,'63g':10);
writeln('NaCl':5,' ':10,'  ':10,'58  ':10,'58 uma':10,'58g ':10,' ':10,'58g':10);
writeln('CaCl2':5,' ':10,'  ':10,'110  ':10,'110 uma':10,'110g ':10,' ':10,'110g':10);
writeln('premi invio');readln;
clrscr;
end.

 

massa atomica e molecolare relativa:numero puro
massa atomica e molecolare assoluta,in grammi o u.m.a
mole,grammoatomo,grammolecola:contengono N particelle
numero di AVOGADRO : N


X atomo o molecola
GA grammoatomo...GM grammomolecola...mole
mAR massa atomica relativa.......mMA massa atomica assoluta
mMR massa molecolare relativa....mMA massa molecolare assoluta
    X       mAR       mAA       mMR       mMA      mole        GA        GM
    H         1     1 uma                            1g        1g
    O        16    16 uma                           16g       16g
    S        32    32 uma                           32g       32g
   Cl        35    35 uma                           35g       35g
    N        14    14 uma                           14g       14g
   Na        23    23 uma                           23g       23g
    K        39    39 uma                           39g       39g
   Ca        40    40 uma                           40g       40g

  H2O                          18      18 uma      18g                  18g
  H2S                          34      34 uma      34g                  34g
  HCl                          36      36 uma      36g                  36g
H2SO3                          72      72 uma      72g                  72g
 HNO3                          63      63 uma      63g                  63g
 NaCl                          58      58 uma      58g                  58g
CaCl2                         110     110 uma     110g                 110g

inizio