【oracle】定义一个Oracle存储过程,输出1~100之间的素数。
发布网友
发布时间:2022-04-07 21:28
我来回答
共3个回答
热心网友
时间:2022-04-07 22:57
declare
v_num number;
v_now number;
v_yes number;
c_max number;
begin
v_num:=1;
c_max:=200;--这里设置最大数,想要100这内就写100,想要1000之内就写1000
loop
v_now:=2;--这里设置每一个数的初始被除数,从2开始
v_yes:=1;--设置初始参考数,1为素数,0为非素数,默认初始为1
if v_num<4 then
dbms_output.put_line(v_num);--1到3都是素数,这里就不再判断了
-- v_num:=v_num+1;--自增1
end if;
if v_num>=4 then
--这里开始判断,只能被1和本身整除的数,就是素数
loop
if mod(v_num,v_now)=0 and v_num<>v_now then --如果有能被整除的数,且被除数不是除数本身,就不是素数
v_yes:=0;
end if;
v_now:=v_now+1;--被除数递增
exit when v_now>=v_num;--当被除数大于除数时退出
end loop;--因为要一个一个的判断,所以要来一次循环
end if;
if v_num>4 and v_yes=1 then
dbms_output.put_line(v_num);
-- v_num:=v_num+1;--自增
end if;
v_num:=v_num+1;--自增
exit when v_num>=c_max;
end loop;
end;
参考一下,自己写的
热心网友
时间:2022-04-08 00:15
收藏别人的,实测正确:
PLSQL计算质数:http://yangtingkun.itpub.net/post/468/53770
DECLARE
TYPE T_RECORD IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
V_RESULT T_RECORD;
I NUMBER DEFAULT 3;
N NUMBER DEFAULT 0;
BEGIN
DBMS_OUTPUT.PUT_LINE(2);
V_RESULT(1) := 3;
WHILE (I < 101) LOOP
FOR J IN 1 .. V_RESULT.COUNT LOOP
IF V_RESULT(J) * V_RESULT(J) > I THEN
DBMS_OUTPUT.PUT_LINE(I);
V_RESULT(V_RESULT.COUNT + 1) := I;
EXIT;
END IF;
IF TRUNC(I / V_RESULT(J)) = I / V_RESULT(J) THEN
EXIT;
END IF;
END LOOP;
IF N = 2 THEN
I := I + 4;
N := 1;
ELSE
I := I + 2;
N := N + 1;
END IF;
END LOOP;
V_RESULT(0) := 2;
END;
热心网友
时间:2022-04-08 01:50
CREATE OR REPLACE
FUNCTION isPrime(
num IN NUMBER)
RETURN BOOLEAN
IS
BEGIN
IF(num<=1) THEN
RETURN FALSE;
END IF;
FOR i IN 2..(num-1)
LOOP
IF(mod(num,i)=0) THEN
RETURN FALSE;
END IF;
END LOOP;
RETURN TRUE;
END;
/
以前写得函数,过程循环调用一下就行
【oracle】定义一个Oracle存储过程,输出1~100之间的素数。
begin v_num:=1;c_max:=200;--这里设置最大数,想要100这内就写100,想要1000之内就写1000 loop v_now:=2;--这里设置每一个数的初始被除数,从2开始 v_yes:=1;--设置初始参考数,1为素数,0为非素数,默认初始为1 if v_num<4 then dbms_output.put_line(v_num);--1到3都是素数...
...判断一个数是不是素数的存储过程。如果是,输出,否则输
sql判断是否是素数的存储过程,你在网上搜索一下,很多这样的代码,好多的写的比较完美,你可以先测试一下,如果有不懂的可以追问
【oracle】定义一个Oracle存储过程,输出1~100之间的素数。
begin v_num:=1;c_max:=200;--这里设置最大数,想要100这内就写100,想要1000之内就写1000 loop v_now:=2;--这里设置每一个数的初始被除数,从2开始 v_yes:=1;--设置初始参考数,1为素数,0为非素数,默认初始为1 if v_num<4 then dbms_output.put_line(v_num);--1到3都是素数...