QBASIC to find Volume of Cylinder

CLS
INPUT "Enter the radisu"; R
INPUT "Enter the height"; H
V =  22/7*R^2*H
PRINT "Volume of cylinder="; V
END