Style Croix
Stylo releve
?->F
?->M
30->A
5->E
-20->C
0->D
Aller à x=C;y=D
Stylo écrit
Répéter jusqu'à :E=(3*4^(F))+5
|1->B
|Si :ENT(E/2)=E/2 Alors
| -2>B
|Fin
|Si :ENT(E/8)=E/8 Alors
| 1>B
|Fin
|E+1->E
|C+M*COS(A)/(3^(F))->C
|D+M*SIN(A)/(3^(F))->D
|Aller à x=C;y=D
Stylo relevé
Aller à x=999;y=999