Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 1781
Réponses : 9
Type : discussion
Etat : réponses autorisées

Conversation °F/°C/°K

Dark TI le 07/04/2006 à 21:53
Voila un programme de convertion entre les degrés Fahrenheit, Celsius, Kelvin
Code
ClrHome
Output(1,4,"CONVERTION"
Output(3,4,"CELSIUS,°C"
Output(5,4,"KELVIN,°K"
Output(7,3,"FAHRENHEIT,°F"
Output(2,1,"****************"
Pause
ClrHOme
Lbl Y
Menu("LES ECHELLES","°C>°K",A,"°C>°F",B,"°F>°C",C,"°F>°K",D,"°K>°F",E,"°K>°C",F,"QUITTER",Z
Lbl Z
Stop
ClrHome
End
Lbl A
Input"°C ?",C
C-273.15->K
Disp "POUR",C,"°C,",K,"°K"
Pause
Goto Y
Lbl B
Input"°C ?",C
9/5*C+32->F
Disp "POUR",C,"°C,",F,"°F"
Pause
Goto Y
Lbl C
Input"°F ?",F
5/9(F-32)->C
Disp "POUR",F,"°F,",C,"°C"
Pause
Goto Y
Lbl E
Input"°K ?",K
9/5K+273.15+32->F
Disp "POUR",K,"°K,",F,"°F"
Pause
Goto Y
Lbl F
Input"°K ?",K
K+273.15->C
Disp "POUR",K,"°K,",C,"°C"
Pause
Goto Y
ratuss le 08/04/2006 à 08:02
Oui c'est pas mal comme idée! bigmouth.gif

Code
Menu("LES ECHELLES","°C>°K",A,"°C>°F",B,"°F>°C",C,"°F>°K",D,"°K>°F",E,"°K>°C",F,"QUITTER",Z


Mais pourquoi faire un menu aussi long, après tout t'as juste à faire 3 sous menu : un pour les Kelvin, degrés celcius et fahrenheit.

Par exemple : l'utilisateur va dans le menu "CELSIUS", ensuite il entre une valeure en °C et ca lui affiche la valeur en °F et en K. happy.gif.

Ps : Kelvin ne s'écrit pas °K frozen.gif , tu dit pas des degrés Kelvin, donc tu l'écris K tout court
Dark TI le 08/04/2006 à 13:36
Ouais c'est vrai mais j'etais presse et puis ca marche alors c'est pas grave...
Apres tu le transformes comme tu veux...
ratuss le 09/04/2006 à 14:42
En fait si je dit ca c'est parce que moi je suis un vrai maniaque de la mémoire, et donc je fait tout pour que le programme prennent le moins de place possible (en plus c'est mieux pour ceux qui recopient à la main)

beer.gif
Sangohan38 le 10/04/2006 à 20:58
Bizzard, moi aussi je suis un manak de la mémoire.
Surtout après avoir modifié mon programme RACE qui prenait 1281 octets.
Mais heureusement, j'ai modifié pour qu'il ne prenne plus que 5700 octets.
ratuss le 11/04/2006 à 17:56
tu veux dire 12810 octet?? eyeonly.gif

Bon en tout cas on se comprend laugh.gif
Sangohan38 le 11/04/2006 à 19:14
Oui, je voulais dire 12810 octets.
Merci d'avoir modifié mon erreur!
je t'en remercie.
ratuss le 11/04/2006 à 20:33
2ri1 winkle.gif
programath le 01/03/2011 à 23:10
Si je peux dire quelque chose, tu as oublié le Lbl D, de fahrenheit a kelvin. Peux-tu me donner la formule stp ?
ld le 09/03/2011 à 10:36
Moi, je vais être franc. moodforlove.gif
Je n'aime pas beaucoup ce programme...