PROGRAM:CONV4

0→C:0→N:0→R
1234.8→V:1079252849→W
EffÉcran
Disp "ha.m²....=0    mètre².ha=1"
Disp "are.m²...=2    m².are...=3"
Disp "ca.m²....=4    m².ca....=5"
Disp "--------------------------"
Disp "km/h.Mach=6    Mach.km/h=7"
Disp "km/h.c...=8    c.km/h...=9"
Disp "--------------------------"

Input "Votre choix = ",C
If C<10:Then
Input "Le chiffre  = ",N
Else
EffÉcran:Stop
End

If C=0
N*10000→R
If C=1
N/10000→R

If C=2
N*100→R
If C=3
N/100→R

If C=4
N*1→R
If C=5
N/1→R

If C=6
N/V→R
If C=7
V*N→R

If C=8
N/W→R
If C=9
W*N→R

Output(9,13,"=")
Output(9,15,R)

Pause 
EffÉcran


=============================================================
Vitesse lumière (W) en km/h
299792.458 km/s (en km/s) * 3600 = 1 079 252 849→W (c en km/h)
=============================================================
Pour la vitesse du son (V)
----------------------
Aux températures habituelles et dans l'air, la vitesse du son vaut environ 340 m/s ou 1 224 km/h.

Attention, ces programmes ne donnent que de bonnes approximations, pour un peu plus de précision
vous pouvez consulter ce tableau qui permet d'avoir une bonne idée de la température réelle selon 
l'altitude et la pression atmosphérique. (Internet pourra vous donner tous les détails)

-------------------------------------------------------------
Altitude en m     Température en °C     vitesse du son en m/s
0                        15                    340,3
1 000                     8,5                  336,4
2 308                     0                    331,3
5 000                   −17,5                  320,5
7 500                   −23,5                  310,2
11 000 à 20 000         −56,5                  295,1
32 000                  −44,5                  303,1
47 000 à 51 000         −2,5                   329,8 
=============================================================
EOF