 CREATE OR REPLACE PROCEDURE INOUT (RAJ IN OUT VARCHAR2) IS
 X NUMBER :=&X;
 Y NUMBER :=&Y;
 Z NUMBER;
 BEGIN
 Z := X*Y;
 DBMS_OUTPUT.PUT_LINE(Z);
 END INOUT;

_____________________________
 DECLARE
 R VARCHAR2(20);
 BEGIN
 INOUT(R);
 DBMS_OUTPUT.PUT_LINE(R);
 END;
 /