Section courante

A propos

Section administrative du site

LOOP

Boucle
Ada

Syntaxe

LOOP
  instr1;
  instr2;
  ...
  instrn
END LOOP;

Paramètres

Nom Description
instr1, instr2, instrn Ce paramètre permet d'indiquer les instructions a exécuter à l'intérieur de la boucle à chaque fois qu'elle est effectué

Description

Ce mot réservé permet d'effectuer des boucles d'instructions infini.

Exemple

Cet exemple permet d'effectuer une simple boucle :

  1. WITH TEXT_IO; USE TEXT_IO;
  2.  
  3. PROCEDURE LoopSamples IS 
  4.    I:Integer;
  5. BEGIN
  6.    I := 0;
  7.    LOOP
  8.       PUT_LINE("i = " & Integer'IMAGE(I));
  9.       I := I + 1;
  10.       IF I >= 10 THEN
  11.          EXIT;
  12.       END IF;
  13.    END LOOP;
  14. END LoopSamples;   

on obtiendra le résultat suivant :

i = 0
i = 1
i = 2
i = 3
i = 4
i = 5
i = 6
i = 7
i = 8
i = 9


Dernière mise à jour : Dimanche, le 1er avril 2018