Program to print volume of cylinder using FUNCTION

DECLARE FUNCTION VOL(R,H)
CLS
INPUT"ENTER RADIUS";R
INPUT"ENTER HEIGHT"H
PRINT"VOLUME OF CYLINDER="VOL(R,H)
END

FUNCTION VOL(R,H)
V=22/7*R^2*H
VOL=V
END FUNCTION