QBASIC PROGRAM TO FIND AREA OF TRIANGLE(SUB)
DECLARE FUNCTION AREA (B,H)
CLS
INPUT "ENTER BREADTH";B
INPUT "ENTER HEIGHT";H
PRINT "AREA OF TRIANGLE";AREA(B,H)
END
FUNCTION AREA (B,H)
A=1/2 *B*H
AREA =A
END FUNCTON
CLS
INPUT "ENTER BREADTH";B
INPUT "ENTER HEIGHT";H
PRINT "AREA OF TRIANGLE";AREA(B,H)
END
FUNCTION AREA (B,H)
A=1/2 *B*H
AREA =A
END FUNCTON
Comments
Post a Comment