VOLUME OF CYLINDER.(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
V=VOL
END FUNCTION