Oracle中函数的使用实例

编写一个函数，实现求N!（即N的阶乘），测试5!（即5的阶乘）。

create or replace function fun1(n int)
return int
is
i int:=1;
s int:=1;
begin
while i<=n
loop
s:=s*i;
i:=i+1;
end loop;
return s;
end;

 create or replace function n_jc(n int)
 return int
 is
 i int:=1;
 s int:=1;
 begin
 for i in 1..n
 loop
 s:=s*i;
 end loop;
 return s;
 end;

 begin
 dbms_output.put_line(n_jc(5));
 end;
或 select n_jc(5) from dual