uses robot;
begin
task ('cif10');
while freefromright do begin
right;

end;
end.

никак не пойму как закрасить помеченные клетки
прошу помогите я уже столько всего перепробовал но никак не уловлю мысль

моя идея была в том чтоб робот когда видит закрашиваемую клетку и внизу нет стены то он опускается-красит-поднимается вверх но он у меня постоянно идет вверх после закрашивания первой помеченной точки

Вы сами написали, что после окрашивания робот должен подниматься.

а как написать чтоб он один раз поднялся т.е. вернулся и дальше вправо пошел

Напишите полностью условие задачи.

uses robot;
begin
task ('cif10');
end.
напишите это в паскале абс и запустите ее там будет задание

Извините, но Паскаля АБС у меня нет.

вот решение мож кому пригодится
uses robot;
begin
task ('cif10');
while freefromright do begin
right;
if cellispainted and freefromdown then begin
down;
paint;
up;
end;
end;
end.


А ВОТ РОБОТ CIF15
Uses Robot;
begin
Task('cif15');
while freefromright do begin
right;
Up;
if CellIsPainted then
begin
Down;
Down;
if CellIsPainted then
begin
Up;
Paint;
Up;
end
else
begin
Up;
Up;
end;
end;
Down;
end;
end.