Question

Помогите дам 100 баллов

Answer 1

Объяснение:

uses graphabc;

var

i: integer;

begin

setwindowsize(600, 101);

for i := 0 to 5 do

begin

circle(50 + i * 100, 50, 50);

circle(50 + i * 100, 50, 15);

end;

end.