program mencari luas segitiga dengan PL/SQL

menggunakan declare :

DECLARE
ALAS NUMBER(5);
TINGGI NUMBER(5);
LUAS NUMBER(10);
BEGIN
ALAS := 6;
TINGGI := 4;
LUAS := (ALAS*TINGGI)/2;
DBMS_OUTPUT.PUT_LINE ('LUAS = ' || LUAS);
END;

menggunakan procedure :
CREATE OR REPLACE PROCEDURE LUAS_SEGITIGA AS
ALAS NUMBER(5);
TINGGI NUMBER(5);
LUAS FLOAT(10);
BEGIN
ALAS := 5;
TINGGI := 4;
LUAS := (ALAS*TINGGI)/2;
DBMS_OUTPUT.PUT_LINE ('LUAS = ' || LUAS);
END;
mengcompile : execute LUAS_SEGITIGA


menggunakan function :
CREATE OR REPLACE FUNCTION LUAS_SEGITIGA
(A IN NUMBER, T IN NUMBER)
RETURN VARCHAR AS
LUAS NUMBER(10);
BEGIN
LUAS := (A*T)/2;
RETURN 'LUAS = ' || LUAS;
END;

mengcompile : select LUAS_SEGITIGA (3,3) from dual