Question

Решите задачу cif4 из встроенного задачника, используя внутри цикла команду ветвления

Answer 1

Ответ:

uses Robot;

begin

Task('cif4');

while FreeFromRight do

begin

right;

if WallFromUp and FreeFromDown then paint

end

end.