10 SCREEN 5
20 FOR I=1 TO 10:CIRCLE (125,95),10+I,I:NEXT
30 COPY (40,40)-(180,180),0 TO "OKR" 'Изображение записывается
40 GOTO 40                           'на дискету под именем "ОКR".