WAP to find the area of cylinder

CLS
INPUT "Enter  radius "; R
TNPUT " Enter  height  ";H
V = 1/2 R ^ 2×H
PRINT  "Volume  of cylinder  =";V
END