一个可以可以把cpu主频长时间占用到100%的pl sql

        一个可以可以把cpu主频长时间占用到100%的pl sql。
        上次应一销售的要求，需要写一个pl sql来消耗客户cpu，经过努力，改写了一个原用于计算pi的c程序，再我笔记本上启两个程序，我的机器就常时间占用cpu到100%，以至于不得不重新启动机器了。
        有兴趣的话可以试试?在本算法中使用了pl sql对于数据的用法！

declare
 a number(38) := 10000000;
 b number(38) := 0;
 c number(38) := 2800000;
 d number(38) := 0;
 e number(38) := 0;
 g number(38) := 0;
 temp number(38,38) := 0;
 i number(38) :=0;
 TYPE NUMBERArrayTyp IS TABLE OF NUMBER(39) ;
 f NUMBERArrayTyp;
 begin
   i := 1;
   f := NUMBERArrayTyp();
   f.extend(c + 1);
   while i < c
   loop
      f(i) := a/5;
   end loop ;
     
   while c != 0 
   loop
       d := 0;
       g := c * 2;
       b := c;
       while  true
       loop
          d := d + f(b) * a;
          g := g -1;
          f(b) := mod(d,g);
          d := d/g;
          g := g -1;
          b := b -1;
          if(b=0) then
              exit;
          end if;
          d := d * b;
       end loop ;
       c := c-14;
      
       temp := e + d/a;
       dbms_output.put_line(temp);
       e := mod(d,a);
    end loop;
 end; 

将a 和c分别改为下列值就可以计算cpu了。
a=10000，c=2800。