Forum

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

Convertisseur degrès/radians/gradians

Sangohan38 le 21/04/2007 à 13:23
Je sais que ce prog à été fait par le Webmaster mais celui la offre la possibilitée de convertir en grades et me semble plus simple à comprendre.
Je précise que les - dans les variables signifie que l'angle est dans le sens inverse.
Le "ü" est la touche [STO], le "åFrac" est le "delta frac", le "Ä" est le symbole [pi], le "ñ" est l'inverse (-1) ay dessus de [X²]

Code
Lbl 0
ClrHome
Menu("ANGLES:","DEG -> RAD",1,"RAD -> DEG",2,"DEG -> GRAD",3,"GRAD -> DEG",4,"RAD -> GRAD",5,"GRAD -> RAD",6,"QUITTER",7
Lbl 7
ClrHome
Output(1,1,"   
Stop
Lbl 1
Input "DEGRES:",A
Output(3,1,"RADIAN:
(180/A)ñü ( ) B
Disp "","",BåFrac
Output(4,1,"Ä*
Pause
Goto 0
Lbl 2
Input "RADIAN:",A
A180/Äü ( ) B
Output(3,1,"DEGRES:
Output(4,1,B
Pause
Goto 0
Lbl 3
Input "DEGRES:",A
A100/90ü ( ) B
Output(3,1,"GRADES:
Output(4,1,B
Pause
Goto 0
Lbl 4
Input "GRADES:",A
A*180/200ü ( ) B
Output(3,1,"DEGRES:
Output(4,1,B
Pause
Goto 0
Lbl 5
Input "RADIANS:",A
A*200/Äü ( ) B
Output(4,1,B
Output(3,1,"GRADES:
Pause
Goto 0
Lbl 6
Input "GRADES:",A
A/200ü ( ) B
Disp "","",BåFrac
Output(3,1,"RADIANS:
Output(4,1,"Ä*
Pause
Goto 0


Sangohan38
Stupid le 04/05/2007 à 18:36
si tu met en mode radian et que tu fait 180° ça te montre bien les radians non??
Sangohan38 le 04/05/2007 à 21:05
Oui mais je ne savait pas si les 82 ont cette fonction pour passer de degré en radian.

Sangohan38
PMdej le 04/05/2007 à 22:10
SI si ... enfin du moins le stats .....
godgrace.gif
vibra le 05/05/2007 à 10:34
La 82 aussi l'a.