Alexandr
Мудрец
(11953)
3 года назад
SCREEN 12
PAINT (320, 240), 15
COLOR 0
CONST R% = 46
FOR i% = R% TO 10 * R% STEP 2 * R%
FOR j% = R% TO 10 * R% STEP 2 * R%
CIRCLE (i%, j%), R%
LINE (i% - R%, j%)-(i%, j% - R%)
LINE (i%, j% - R%)-(i% + R%, j%)
LINE (i% + R%, j%)-(i%, j% + R%)
LINE (i%, j% + R%)-(i% - R%, j%)
NEXT j%
NEXT i%
COLOR 15
END