REM PROGRAM TO DISPLAY AREA OF PARALLELOGRAM
CLS
INPUT “ENTER BREADTH”; B
INPUT “ENTER HEIGHT”; H
A = B * H
PRINT “AREA OF PARALLELOGRAM “; 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 = B * H
PRINT “AREA OF PARALLELOGRAM ”; 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 PARALLELOGRAM ”; AR
END
FUNCTION AREA (B, H)
A = B * H
AREA = A
END FUNCTION
No Comments