Qbasic to find of circle

Qbasic to find of circle

CLS
INPUT "Enter the radius"; R
A = 22/7*R^2
PRINT "Area of circle="; A
End