AREA OF TRIANGLE(FUNCTION)

DECLARE FUNCTION AREA(A,B,C)

CLS

INPUT"ENTER FIRST SIDE";A

INPUT"ENTER SECOND SIDE";B

INPUT"ENTER THIRD SIDE";C

PRINT" AREA OF TRIANGLE";AREA(A,B,C)

END

FUNCTION AREA (A,B,C)

AREA=(S*(S-A)*(S-B)*(S-C))^(1/2)

A=AREA

END FUNCTION