Составить алгоритм управления Чертёжником, в результате которого на координатной плоскости будет нарисован квадрат, длина стороны которого равна 9 единицам.

Алгоритм:

сместиться в точку (26,26)
опустить перо
сместиться на вектор (__,9)
сместиться на вектор (__,0)
сместиться на вектор (0,__)
сместиться на вектор (−9,0)

сместиться в точку (26,26)

опустить перо

сместиться на вектор (0,9)

сместиться на вектор (9,0)

сместиться на вектор (0,-9)

сместиться на вектор (−9,0)

поднять перо

сместиться в точку (0,0)

Код программы на PascalABC.NET:

uses Drawman;

begin

Field(40,40);

ToPoint(26,26);

PenDown();  

OnVector(0,9);

OnVector(9,0);

OnVector(0,-9);

OnVector(-9,0);

PenUp;

ToPoint(0,0);

end.