Practical#14

SOURCE PROGRAM


10 REM DRAW THE OLYMPIC CIRCLES

20 CLS

30 SCREEN 1

40 CLS

50 CIRCLE(115,75),35

60 PAINT(115,75)

70 CIRCLE(185,75),35

80 PAINT(185,75)

90 CIRCLE(255,75),35

100 PAINT(255,75)

110 CIRCLE(150,100),35

120 PAINT(150,100)

130 CIRCLE(210,100),35

140 PAINT(210,100)

150 LOCATE 20,17 : PRINT "OLYMPIC CIRCLES"

160 END


OUTPUT

Return to Top