Galerie MicroAlg

**Ceci est une ancienne révision du document !**

(!!! “Algo mystère n°2”) (Declarer listefruits Detype “liste”) (Declarer varmystere Detype “texte”) (Declarer i De_type “nombre”)

(Affectera listefruits (Liste “pomme” “poire” “banane” “kiwi”)) (Afficher “Voici une liste de fruits :”) (Afficher listefruits) (Affectera varmystere “”) (Affectera i 1) (Tantque (⇐ i (Longueur listefruits)) Faire

  (Affecter_a var_mystere (Concatener var_mystere (Nieme liste_fruits i)" "))
  (Affecter_a i (+ i 1))

) (Afficher var_mystere) (!!! “Fin algo mystère n°2”)