Wap to find volume of cylinder
DECLARE FUNCTION VOL(R,H)
CLS
INPUT"ENTER RADIUS";R
INPUT"ENTER HEIGHT";H
PRINT"VOLUME OF CYLINDER IS";VOL(R,H)
END
FUNCTION VOL(R,H)
VOL=22/7*R^2*H
END FUNCTION
CLS
INPUT"ENTER RADIUS";R
INPUT"ENTER HEIGHT";H
PRINT"VOLUME OF CYLINDER IS";VOL(R,H)
END
FUNCTION VOL(R,H)
VOL=22/7*R^2*H
END FUNCTION
No comments:
Post a Comment