QBASIC PROGRAM TO FIND VOLUME OF THE CYLINDER (FUNCTION)
DECLARE FUNCTION VOL(R,H)
CLS
INPUT "ENTER RADIUS";R
INPUT "ENTER HEIGHT";H
PRINT "THE VOLUME OF CYLINDER";VOL(R,H)
END
FUNCTION VOL(R,H)
V=22/7*R^2*H
VOL=V
END FUNCTION
CLS
INPUT "ENTER RADIUS";R
INPUT "ENTER HEIGHT";H
PRINT "THE VOLUME OF CYLINDER";VOL(R,H)
END
FUNCTION VOL(R,H)
V=22/7*R^2*H
VOL=V
END FUNCTION
Comments
Post a Comment