Составьте программу для решения задачи с8 из встроенного задачника.Используйте вспомагательный алгоритм.

Ответ:

uses Robot;

procedure shag;

begin

 paint;

 down;

 left;

 up;

 end;

begin

 Task('c8');

 for i:integer:=1 to 10 do shag;

 paint;

end.