p 347

1   VARIABLES
2     X EST_DU_TYPE NOMBRE
3     Y EST_DU_TYPE NOMBRE
4     Z EST_DU_TYPE NOMBRE
5     TETA EST_DU_TYPE NOMBRE
6     D EST_DU_TYPE NOMBRE
7   DEBUT_ALGORITHME
8     LIRE TETA
9     X PREND_LA_VALEUR 0
10    Y PREND_LA_VALEUR cos(TETA)
11    Z PREND_LA_VALEUR abs(sin(TETA))
12    D PREND_LA_VALEUR pow(X,2)+pow(Y,2)+pow(Z,2)
13    SI (D==1) ALORS
14      DEBUT_SI
15      AFFICHER "OUI"
16      FIN_SI
17      SINON
18        DEBUT_SINON
19        AFFICHER "NON"
20        FIN_SINON
21  FIN_ALGORITHME