Menampilkan Deret Bilangan Prima Dengan PL/SQL

Selamat pagi,,, 😉
Kali ini aku mau berbagi satu hal baru (bagiku) tentang PL/SQL yang baru ku pelajari. Contoh source code berikut ini adalah untuk menampilkan deretan bilangan prima menggunakan PL/SQL Oracle. Oke, langsung saja lihat source code deretan bilangan prima denga PL/SQL Oracle berikut ini :

SET SERVEROUTPUT ON
DECLARE
K NUMBER(3);
I INTEGER;
BEGIN
K:=&input;
DBMS_OUTPUT.PUT('2 ');
FOR I IN 2..K LOOP
	IF MOD(I,2)>0 THEN
		IF I > 7 THEN
			IF MOD(I,3)>0 AND MOD(I,5)>0 AND MOD(I,7)>0 THEN
				DBMS_OUTPUT.PUT(TO_CHAR(I) || ' ');
			END IF;
		ELSE
			DBMS_OUTPUT.PUT(TO_CHAR(I) || ' ');
		END IF;
	END IF;
END LOOP;
DBMS_OUTPUT.NEW_LINE;
END;

Sedikit keterangan mengenai kode diatas, untuk variabel K digunakan untuk menampung hasil input yang merupakan sampai angka berapa deretan bilangan prima ditampilkan.