Untitled

declare
 i integer;
n integer;
 c integer;
begin
 n:=:n;
 for i in 2..n loop
c:=0;
for j in 1..i loop
if(mod(i,j)=0) then
c:=c+1;
end if;
end loop;
if (c=2) then
dbms_output.put_line(i);
 end if;
end loop;
 end;