Упражнения для оператора PL / SQL: выведите простые числа от 1 до 50

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

Напишите программу на PL / SQL для печати простых чисел от 1 до 50.

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

Код PL / SQL:

DECLARE
    i NUMBER(3);
    j NUMBER(3);
BEGIN
dbms_output.Put_line('The prime numbers are:');
	dbms_output.new_line;
    i := 2;
    LOOP
        j := 2;
        LOOP
            EXIT WHEN( ( MOD(i, j) = 0 )
                        OR ( j = i ) );
            j := j + 1;
        END LOOP;
        IF( j = i )THEN
          dbms_output.Put(i||'   ');							   
        END IF;
        i := i + 1;
        exit WHEN i = 50;
    END LOOP;
	dbms_output.new_line;
END;
/

Блок - схема:

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

 Простые числа:
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47
Процедура PL / SQL успешно завершена. 

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

Предыдущий: Напишите программу на PL / SQL, чтобы объяснить использование вложенного цикла for с меткой.
Далее: Напишите программу на PL / SQL, чтобы проверить, является ли число простым или нет, используя оператор goto с циклом for.