CREATE OR REPLACE PROCEDURE square_cube (n IN NUMBER,square OUT NUMBER,cube OUT NUMBER) IS
BEGIN
    square := n * n;
    cube := n * n * n;
END square_cube;
/
DECLARE
    v_number NUMBER := 4;
    v_square NUMBER;      
    v_cube NUMBER;       
BEGIN
    square_cube(v_number, v_square, v_cube);
    DBMS_OUTPUT.PUT_LINE('Number: ' || v_number);
    DBMS_OUTPUT.PUT_LINE('Square: ' || v_square);
    DBMS_OUTPUT.PUT_LINE('Cube: ' || v_cube);
END;
/