какая ошибка в коде????

Question

[PASCAL]begin
y:=200;
for i:=1 to 30 do
begin
if i<5 then SetColor(4);
if (i>5)and(i<10) then SetColor(14);
if (i>10)and(i<15) then SetColor(2);
if (i>20)and(i<25) then SetColor(1);
if i>25 then SetColor(13);
Ellipse(325,y,10,170,240,150);
y:=y+1;
end;[/PASCAL]

Максим · Accepted Answer

var x,y,i:integer; и что это SetColor(4); а не setbrushcolor(claqua);

Руслан · Answer

У тебя в коде пропущено ELSE

Гена · Answer

если i=5 (10,25) и от 15 до 20 то по твоему само что то сделается?