QBASIC PROGRAM TO FIND THE AREA OF CIRCLE(SUB)


DECLARE SUB AREA(R)
CLS
INPUT"ENTER RADIUS"; R
CALL AREA(R)
END

SUB AREA(R)
A=22/7*R^2
PRINT"AREA OF CIRCLE"; A
END SUB

Comments

Post a Comment

Popular Posts