Comment imprimer 1 à 10 sans utiliser de boucle en PL/SQL ?

Ici, je donne un exemple pour imprimer 1 à 10 sans utiliser la boucle en PL/SQL. Vous pouvez imprimer jusqu'à n'importe quel nombre en remplaçant la valeur 10 par n'importe quel nombre, par exemple 100.

Programme PL/SQL pour imprimer 1 à 10 sans utiliser de boucle

Dans le programme ci-dessous, j'utilise des étiquettes PL/SQL au lieu de la boucle pour incrémenter la valeur et imprimer. Dans l'étiquette nommée (label_main), j'incrémente la valeur de la variable (i) et vérifie si sa valeur est supérieure à 10, puis passe le contrôle à une étiquette nommée (label_end) sinon passe le contrôle à l'étiquette (label_main). Vous pouvez modifier la valeur dans la condition IF de 10 au nombre souhaité pour imprimer jusqu'à ce nombre.

SET SERVEROUTPUT ON;

DECLARE
   i   NUMBER;
BEGIN
   i := 0;

  <<label_main>>
   i := i + 1;

   IF i > 10
   THEN
      GOTO label_end;
   END IF;

  <<label_print>>
   DBMS_OUTPUT.put_line (i);
   GOTO label_main;

  <<label_end>>
   NULL;
END;
/

Sortie

1
2
3
4
5
6
7
8
9
10
PL/SQL procedure successfully completed.