PLSQL计算质数(转)

PLSQL计算质数

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

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

下面就是最常见的一种写法：（也是最差的一种）

PHP code:

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


.

[@more@]

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/9279504/viewspace-997054/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/9279504/viewspace-997054/