krugs2.BAS

{* Круги на воде *}

REM basic

' Круги на воде



20 SCREEN 1 Key Off: CLS

25 For J=1 To 3 

30 For R=10 To 70 Step 5 {изменение радиусов окружностей
}

40 CIRCLE(128,96),R,J

50 Next

60 Next