Answer to Question #103264 in Programming & Computer Science for Ena

Question

Write a Qbasic program to read in the radius r of a circle, centered at the origin. then read in the coordinate pair(x, y) of a point and determine that point lies within the circle.

Answer 1

' qbasic.net/en/qbasic-tutorials/beginner/qbasic-beginner-2.htm
CLS
INPUT "Enter the radius of a circle in the origin "; rad
INPUT "Enter the coordinates of a point "; px, py
diff = px * px - rad * rad + py * py
IF diff < 0 THEN
    PRINT "Yes, it lies within the circle"
ELSE
    PRINT "No, it doesn't lie within the circle"
END IF