declare a integer :=&a; b integer:=0 ; begin fact(a,b); dbms_output.put_line(b); end; / create or replace procedure fact(n in integer,b in out integer) is begin b:=1; for i in 1..n loop b:=b*i; end loop; end; /
declare a integer :=&a; b integer:=0 ; begin fact(a,b); dbms_output.put_line(b); end; / create or replace procedure fact(n in integer,b in out integer) is begin b:=1; for i in 1..n loop b:=b*i; end loop; end; /