REM PROGRAM TO DISPLAY AREA OF TRIANGLE
CLS
INPUT “ENTER BREADTH”; B
INPUT “ENTER HEIGHT”; H
A = 1 / 2 * (B * H)
PRINT “AREA OF TRIANGLE “; A
END
USING SUB PROCEDURE
DECLARE SUB AREA (B, H)
CLS
INPUT “ENTER BREADTH”; B
INPUT “ENTER HEIGHT”; H
CALL AREA (B, H)
END
SUB AREA (B, H)
A = 1 / 2 * (B * H)
PRINT “AREA OF TRIANGLE”; A
END SUB
USING FUNCTION PROCEDURE
DECLARE FUNCTION AREA (B, H)
CLS
INPUT “ENTER BREADTH”; B
INPUT “ENTER HEIGHT”; H
AR = AREA( B, H)
PRINT “AREA OF TRIANGLE ”; AR
END
FUNCTION AREA (B, H)
A = 1 / 2 * (B * H)
AREA = A
END FUNCTION
No Comments