Упражнения для оператора управления PL / SQL: Проверьте, является ли число простым или нет, используя оператор goto с циклом for

Оператор управления PL / SQL: упражнение 28 с решением

Напишите программу на PL / SQL, чтобы проверить, является ли число простым или нет, используя оператор goto с циклом for.

Пример решения:

Код PL / SQL:

DECLARE
  msg  VARCHAR2(30);
  n  PLS_INTEGER := 83;
BEGIN
  FOR i in 2..ROUND(SQRT(n)) LOOP
    IF n MOD i = 0 THEN
      msg :=' is not a prime number';
      GOTO when_prime;
    END IF;
  END LOOP;
  msg :=' is a prime number';
 
  <>
  DBMS_OUTPUT.PUT_LINE(TO_CHAR(n) || msg);
END;
/

Блок - схема:

Пример вывода:

 83 простое число
Процедура PL / SQL успешно завершена.

Улучшите этот пример решения и опубликуйте свой код через Disqus

Предыдущий: Напишите программу на PL / SQL для печати простых чисел от 1 до 50.
Далее: Напишите программу на PL / SQL для вставки записей из одной таблицы в другую.