declare 
p number(4); 
q number(4); 
r number(4); 
s number(4); 
procedure p1(a number, b number, c out number, d out number, e out number, f out number) is 
begin 
c:=a+b; 
d:=a-b; 
e:=a*b; 
f:=a/b; 
end; 
begin 
p1(2, 3, p, q, r, s); 
dbms_output.put_line(p||' '||q||' '||r||' '||s); 
end;