计算100之内的和 create or replace procedure testloop(num in number,sumvalue out number ) as begin declare orinum number := 0; sum1 number :=0; begin loop if (orinum>num) then sumvalue:=sum1; DBMS_OUTPUT.PUT_LINE('result value:'||sumvalue); exit; end if; sum1:=sum1+orinum; orinum:=orinum+1; DBMS_OUTPUT.PUT_LINE(sum1); end loop; end; end testloop;
调用
declare num number ; sumvalue number; begin num:=100; sumvalue:=0; testloop(num,sumvalue); DBMS_OUTPUT.PUT_LINE('最终结果是:'||sumvalue); end;