Programs to find Area of Circle in QBASIC
CLS
INPUT "Enter Radius"; r
a = 22 / 7 * r ^ 2
PRINT "Area="; a
END