Bonsoir,

Je dois, pour la première fois, rentrer seule un programme sur ma calculette de type casio graph 35+. Cependant, je pense avoir pas mal de faute dans ma retranscription du langage naturel en langage sur calculatrice puisque effectivement, une fois mon programme écrit, on m'affiche "Error" . Pouvez-vous vérifier où est-il erroné ? Merci.

LANGAGE NATUREL :


VARIABLES :

q, r, m, n, s et v

ENTRÉE :

  Saisir le nombre entier n


TRAITEMENT :

POUR m de 1 à 99 FAIRE   
    n prend la valeur m   
    v prend la valeur 1   
    s prend la valeur 0   

TANT QUE v est égal à 1  FAIRE         
   TANT QUE n>0 FAIRE             
      q prend la partie entière de n/10             
      r prend la valeur n- 10q             
      s prend la valeur s + r^2             
      n prend la valeur q       
 FIN TANT QUE       
 SI s vaut 1 ou 4           
      v prend la  valeur 0       
 SINON             
      n prend la valeur s             
      s prend la valeur 0       
 FIN SI   
FIN TANT QUE   
FIN POUR

SORTIE :

AFFICHER m puis s sur la même ligne



PROGRAMME SUR CALCULETTE :

VARIABLES :

?->R
?->M
?->N
?->S
?->V

ENTRÉE :

"N"-> Int N

TRAITEMENT :

For M For 1 To 99
N->M
V->1
S->0
While V=1
While N>0
Q->Int (N/10)
R->N-10Q
S->S+R^2
N->Q
WhileEnd
If S=1 OU S=4
V=O
else N->S
S->0
IfEnd
WhileEnd
Next

SORTIE :

M(triangle noir)
S(triangle noir)