如何用mysql求质数_PLSQL计算质数

看到有人实现了一个计算质数的函数，就是效率有点差，贴一个以前写的计算质数的算法。

目标很简单，列出100以内的质数。

其实算法很简单，两个循环就搞定了。但是发现使用不同的算法，执行效率差别之大相当惊人，特别是数据量级很大的时候。

下面就是最常见的一种写法：(也是最差的一种)

[PHP]

SQL> SET SERVEROUT ON

SQL> DECLARE

2   V_FLAG BOOLEAN;

3  BEGIN

4   FOR I IN 2 .. 100 LOOP

5    V_FLAG := TRUE;

6    FOR J IN 2 .. I - 1 LOOP

7     IF  MOD(I,J) = 0 THEN

8      V_FLAG := FALSE;

9     END IF;

10    END LOOP;

11

12    IF V_FLAG = TRUE THEN

13     DBMS_OUTPUT.PUT_LINE(I);

14    END IF;

15   END LOOP;

16  END;

17  /

2

3

5

7

11

13

17

19

23

29

31

37

41

43

47

53

59

61

67

71

73

79

83

89

97

PL/SQL 过程已成功完成。

已用时间:  00: 00: 00.09

.

[/PHP]

由于屏幕输出操作比较慢，为了避免影响，将屏幕输出关闭。并将数据量增大到100000，以下所有的测试都在这个相同条件下进行。

[PHP]

SQL> DECLARE

2   V_FLAG BOOLEAN;

3  BEGIN

4   FOR I IN 2 .. 100000 LOOP

5    V_FLAG := TRUE;

6    FOR J IN 2 .. I - 1 LOOP

7     IF  MOD(I,J) = 0 THEN

8      V_FLAG := FALSE;

9     END IF;

10    END LOOP;

11

12    IF V_FLAG = TRUE THEN

13     --DBMS_OUTPUT.PUT_LINE(I);

14     NULL;

15    END IF;

16   END LOOP;

17  END;

18  /

PL/SQL 过程已成功完成。

已用时间:  02: 02: 58.73

.

[/PHP]

这种方法在100000数据量的用时居然达到了2个小时。

如果稍微仔细考虑一下，就会发现，系统做了很多没有必要的工作，首先判断是否能整除的时候不需要循环到I – 1，只要执行到I的平方根就可以了，而且，如果I可以被整除就不需要继续循环，可以马上跳出内层循环了。经过简单优化后：

[PH