CREATE OR REPLACE PROCEDURE aritmetica (num1 NUMBER, num2 NUMBER) IS
suma NUMBER(6);
resta NUMBER(6);
div NUMBER(6,2);
multi NUMBER(6,2);
BEGIN
suma := num1 + num2;
resta:= num1 - num2;
div:= num1 / num2;
multi:= num1 * num2;
DBMS_OUTPUT.PUT_LINE('La suma es: '|| suma);
DBMS_OUTPUT.PUT_LINE('La resta es: '|| resta);
DBMS_OUTPUT.PUT_LINE('La division es: '|| div);
DBMS_OUTPUT.PUT_LINE('La multiplicacion es: '|| multi);
END aritmetica;
No hay comentarios:
Publicar un comentario