CREATE OR REPLACE PROCEDURE print_multiples_of_72 AS
counter NUMBER := 1;
number_found NUMBER := 0;
BEGIN
DBMS_OUTPUT.PUT_LINE('Первые 15 натуральных чисел, кратных 72:');
WHILE number_found < 15 LOOP
IF MOD(counter, 72) = 0 THEN
DBMS_OUTPUT.PUT_LINE(counter);
number_found := number_found + 1;
END IF;
counter := counter + 1;
END LOOP;
END;
/