Algobox: creation d'un algorithme

[MS74]

Bonjour a tous,

Pourriez vous m'aider a écrire cette algorithme en langage algobox ?

Entrer A et N
U prend la valeur 1
Affecter à A son chiffre des unités
Tant que N>0 faire
Affecter à Q le quotient de N dans la division euclidienne par 2
Affecter à R le reste de N dans la division euclidienne par 2
Si R=1
affecter à U la valeur U*A
fin si
Affecter a A le chiffre des unités de A²
N prend la valeur Q
fin tant que
Affecter à U son chiffre des unités
Afficher U



Dans les variables j'ai déclaré A,N,Q,R et U du type nombre
Debut algorithme:
lire A
Lire N
U prend la valeur 1
A prend la valeur floor(A/10)
tant que (N>0) faire
debut tant que
Q prend la valeur N%2 (ici il y a une erreur mais quoi?)
R prend la valeur N%2
si (R==1= alors
debut si
U prend la valeur U*A (ici il y a aussi une erreur, laquelle?)
fin si
A prend la valeur floor(A*A)
N prend la valeur Q
Fin tant que
U prend la valeur floor(U)
Lire U
Fin algorithme

MERCI D'AVANCE

[Tiruxa]

Dans les variables j'ai déclaré A,N,Q,R et U du type nombre
Debut algorithme:
lire A
Lire N
U prend la valeur 1
A prend la valeur floor(A/10) A%10
tant que (N>0) faire
debut tant que
Q prend la valeur N%2 floor(N/2)
R prend la valeur N%2
si (R==1) alors
debut si
U prend la valeur U*A
fin si
A prend la valeur floor(A*A)(A*A)%10
N prend la valeur Q
Fin tant que
U prend la valeur floor(U)U%10
Lire UAfficher U
Fin algorithme

MERCI D'AVANCE

Remarques ;
Le chiffre des unités de a est en fait le reste de la division de a par 10
Le quotient de la division euclidienne de a par b est la partie entière de (a/b)
Confusion entre Lire (entrée de donnée) et Afficher (sortie de donnée)

[MS74]

Rentrant tout juste de cours, je me met de suite a vérifier si cela fonctionne, merci.

[MS74]

Merci pour votre aide, cela fonctionne très bien. Bonne soirée.