Files
tp-algorithmique/algo carré

12 lines
80 B
Plaintext

a entier
debut
ecrire "Entrer un nombre: "
lire a
a = a * a
afficher a
fin