Jak wydrukować od 1 do 10 bez użycia pętli w PL/SQL?

Tutaj podaję przykład drukowania od 1 do 10 bez użycia pętli w PL/SQL. Możesz wydrukować do dowolnej liczby, zmieniając wartość 10 na dowolną liczbę, na przykład 100.

Program PL/SQL do drukowania od 1 do 10 bez użycia pętli

W poniższym programie używam etykiet PL/SQL zamiast pętli do zwiększania wartości i drukowania. W etykiecie o nazwie (label_main) zwiększam wartość zmiennej (i) i sprawdzam, czy jej wartość jest większa niż 10, a następnie przekazuję kontrolę do etykiety o nazwie (label_end), w przeciwnym razie przekazuję kontrolę do label (label_main). Możesz zmienić wartość w warunku JEŻELI z 10 na żądaną liczbę, aby wydrukować do tej liczby.

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;
/

Wyjście

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