{* Задача110 *}

REM basic

' Напишите программу, рисующую цепочку соприкасающихся окружностей с заданными в операторе data радиусами


DATA 50, 20, 10, 25, 40, 15, 60
SCREEN 9
Х=0
For 1=1 ТО 7
READ R
CIRCLE (X+R, 175), R, 14
X=X+2*R Next I End