100 REM CIRCLE DEMONSTRATION›110 REM PROGRAM #3›120 REM ›130 REM ›140 REM THIS METHOD TAKES APPROXIMATELY 17 SECONDS›210 GRAPHICS 8›220 COLOR 1›230 SETCOLOR 2,0,0›240 A=160›250 B=80›260 R=50›270 X0=-R:Y0=0›300 FOR X1=-R TO R›310 Y1=INT(0.5+SQR(R*R-X1*X1))›330 PLOT A+X0,B+Y0:DRAWTO A+X1,B+Y1›335 PLOT A+X0,B-Y0:DRAWTO A+X1,B-Y1›336 X0=X1:Y0=Y1›340 NEXT X1›