"DECOMPOSITION"?->N
3->D
While Frac (N/2)=0
N/2->N
2¤                  ' ¤ = triangle (disp)
WhileEnd
While sqrt(N)>D     ' sqrt= racine   > : supérieur ou égal
If Frac (N/D)=0
 Then N/D->N
 D¤
 Else D+2->D
IfEnd
WhileEnd
N