circle3.BAS

{* Три круга *}

REM basic

' Составить программу изображения трёх кругов с радиусами:
' R1 = 100, R2 = 80, R3 = 25.


SCREEN 7
CIRCLE (150,120), 100, 2
PAINT (150,120), 2, 2
CIRCLE (150,120), 80, 4
PAINT (150,120), 4, 4
CIRCLE (150,120), 25, 15
PAINT (150,120), 15, 15
End