查询1到100 之内的,素数;
declare
a number:=0;
b number:=0;
m number:=0;
begin
for i in 2..100 loop
m:=i;
for j in 2..i-1 loop
b:=b+1;
if mod(i,j)<>0 then --MOD返回i除以j的余数,如果i/j不是0,返回i。
a:=a+1;
end if;
end loop;
if a=b then
dbms_output.put_line('第'||(b+1)||'个素数是:'||m);
end if ;
a:=0;
b:=0;
end loop;
end;