Présentation de l'algorithme :

Cet algorithme vous transforme vos coordonés polaires en carthésien et inversement.

Tester l'algorithme :


(cliquer sur le bouton ci-dessus pour lancer ou relancer l'exécution de l'algorithme)
Remarque : si les messages "Algorithme lancé" et "Algorithme terminé" n'apparaissent pas au bout d'un moment dans la zone ci-dessous, c'est que l'algorithme contient une erreur.

Résultats :

Code de l'algorithme :
1     VARIABLES
2       Menu EST_DU_TYPE NOMBRE
3       R EST_DU_TYPE NOMBRE
4       θ EST_DU_TYPE NOMBRE
5       X EST_DU_TYPE NOMBRE
6       Y EST_DU_TYPE NOMBRE
7       U EST_DU_TYPE NOMBRE
8       E EST_DU_TYPE NOMBRE
9       Arcsin EST_DU_TYPE NOMBRE
10      tours EST_DU_TYPE NOMBRE
11      puissance EST_DU_TYPE NOMBRE
12      multiplicationHaut EST_DU_TYPE NOMBRE
13      multiplicationBas EST_DU_TYPE NOMBRE
14    DEBUT_ALGORITHME
15      TANT_QUE (Menu!=3) FAIRE
16        DEBUT_TANT_QUE
17        Menu PREND_LA_VALEUR 0
18        SI (Menu!=1 ET Menu!=2) ALORS
19          DEBUT_SI
20          AFFICHER " "
21          AFFICHER "Taper 1, 2 ou 3"
22          AFFICHER "1- Polaire vers carthésien."
23          AFFICHER "2- Carthésien vers polaire."
24          AFFICHER "3- Quiter."
25          LIRE Menu
26          FIN_SI
27        SI (Menu==1) ALORS
28          DEBUT_SI
29          AFFICHER " "
30          AFFICHER "R (rayon) ?"
31          LIRE R
32          AFFICHER "θ (théta) = pi* ?"
33          LIRE θ
34          AFFICHER " "
35          X PREND_LA_VALEUR R*cos(θ*Math.PI)
36          Y PREND_LA_VALEUR R*sin(θ*Math.PI)
37          AFFICHER "X="
38          AFFICHER X
39          AFFICHER "Y="
40          AFFICHER Y
41          PAUSE
42          FIN_SI
43        SI (Menu==2) ALORS
44          DEBUT_SI
45          AFFICHER " "
46          AFFICHER "X ?"
47          LIRE X
48          AFFICHER "Y ?"
49          LIRE Y
50          R PREND_LA_VALEUR sqrt(pow(X,2)+pow(Y,2))
51          AFFICHER " "
52          SI (X>=0 ET Y>=0) ALORS
53            DEBUT_SI
54            U PREND_LA_VALEUR 0
55            FIN_SI
56          SI (X>=0 ET Y<0) ALORS
57            DEBUT_SI
58            U PREND_LA_VALEUR -0.5
59            FIN_SI
60          SI (X<0 ET Y>=0) ALORS
61            DEBUT_SI
62            U PREND_LA_VALEUR 0.5
63            FIN_SI
64          SI (X<0 ET Y<0) ALORS
65            DEBUT_SI
66            U PREND_LA_VALEUR -1
67            FIN_SI
68          Arcsin PREND_LA_VALEUR Y/R
69          puissance PREND_LA_VALEUR 3
70          multiplicationHaut PREND_LA_VALEUR 1
71          multiplicationBas PREND_LA_VALEUR 2
72          tours PREND_LA_VALEUR 0
73          TANT_QUE (tours!=148) FAIRE
74            DEBUT_TANT_QUE
75            Arcsin PREND_LA_VALEUR Arcsin+(multiplicationHaut*pow((Y/R),puissance))/(puissance*multiplicationBas)
76            multiplicationHaut PREND_LA_VALEUR multiplicationHaut*puissance
77            multiplicationBas PREND_LA_VALEUR multiplicationBas*(puissance+1)
78            puissance PREND_LA_VALEUR puissance+2
79            tours PREND_LA_VALEUR tours+1
80            FIN_TANT_QUE
81          θ PREND_LA_VALEUR (Arcsin/Math.PI)+U
82          SI (Y<0) ALORS
83            DEBUT_SI
84            θ PREND_LA_VALEUR -θ
85            FIN_SI
86          SI (abs(E)>=1) ALORS
87            DEBUT_SI
88            θ PREND_LA_VALEUR θ-2
89            FIN_SI
90          AFFICHER "R= "
91          SI (R==floor(R)) ALORS
92            DEBUT_SI
93            AFFICHER R
94            FIN_SI
95            SINON
96              DEBUT_SINON
97              AFFICHER "racine("
98              R PREND_LA_VALEUR pow(R,2)
99              AFFICHER R
100             AFFICHER ")"
101             FIN_SINON
102         AFFICHER "θ= pi*"
103         AFFICHER θ
104         PAUSE
105         FIN_SI
106       FIN_TANT_QUE
107   FIN_ALGORITHME