Как нарисовать в "кумир" число 1, 2, 3, 4, 5, 7, 8, 9? исполнитель чертежник

Использовать чертежник алг  нач опустить перо сместиться на вектор (0,4) сместиться на вектор (-1,-1) поднять перо сместиться на вектор (4,-3) опустить перо сместиться на вектор (-2,0) сместиться на вектор (2,2) сместиться на вектор (0,2) сместиться на вектор (-2,0) поднять перо сместиться на вектор (3,0) опустить перо сместиться на вектор (2,0) сместиться на вектор (-2,-2) сместиться на вектор (2,0) сместиться на вектор (-2,-2) поднять перо сместиться на вектор (5,0) опустить перо сместиться на вектор (0,4) сместиться на вектор (-2,-3) сместиться на вектор (2,0) поднять перо сместиться на вектор (1,-1) опустить перо сместиться на вектор (2,0) сместиться на вектор (0,2) сместиться на вектор (-2,0) сместиться на вектор (0,2) сместиться на вектор (2,0) поднять перо сместиться на вектор (3,0) опустить перо сместиться на вектор (-2,-2) сместиться на вектор (0,-2) сместиться на вектор (2,0) сместиться на вектор (0,2) сместиться на вектор (-2,0) поднять перо сместиться на вектор (3,-2) опустить перо сместиться на вектор (2,4) сместиться на вектор (-2,0) сместиться на вектор (3,0) опустить перо сместиться на вектор (0,-4) сместиться на вектор (2,0) сместиться на вектор (0,2) сместиться на вектор (-2,0) сместиться на вектор (2,0) сместиться на вектор (0,2) сместиться на вектор (-2,0) поднять перо сместиться на вектор (3,-4) опустить перо сместиться на вектор (2,2) сместиться на вектор (0,2) сместиться на вектор (-2,0) сместиться на вектор (0,-2) кон

алгоритм — это предназначенное для конкретного исполнения точное описание последовательности и действий, направленных на решение поставленной .

свойства алгоритма.

дискретность — разделение алгоритма на последовательность шагов.

результативность — получение из исходных данных результата за конечное число шагов.

массовость — возможность применения алгоритма к большому количеству различных исходных данных.

детерминированность (определенность) — исполнитель должен выполнять команды алгоритма в строго определенной последовательности.

выполнимость и понятность — алгоритм должен содержать команды, входящие в систему команд исполнителя и записанные на понятном исполнителю языке.

Function sq(a,b,c: real): real; var p: real; begin p: =(a+b+c)/2; result: =sqrt(p*(p-a)*(p-b)*(p-c)) end; function tr(a,b,c: real): boolean; begin result: =(a+b> c)and(a+c> b)and(b+c> a) end; var a,b,c,k1,k2,h,t,s,r1,r2: real; begin writeln(' найти радиус или площадь треугольника? если радиус,то нажмите 1. если площадь, то нажмите 2 '); readln(k1); if k1=1 then    begin    writeln('окружность вписанная(нажмите 1) или описанная(нажмите 2)? ');   readln(k2);   write('сторона а = ');   readln(a);   write('сторона b = ');   readln(b);   write('сторона с = ');   readln(c);   if tr(a,b,c) then   begin   s: =sq(a,b,c);   if k2=1 then    begin   r1: =(a+b+c)/(2*s);   writeln('радиус вписанной окружности = ' , r1);   end;   if k2=2 then    begin   r2: =a*b*c/(4*s);   writeln('радиус описанной окружности = ', r2);   end;   end else writeln('треугольник не существует');   end else   if k1=2 then   begin   writeln('что вам известно? если а и h, то нажмите 1. если а,b,с то нажмите 2' );   readln(k2);   if k2=1 then   begin   write('высота = ');   readln(h);   write('cторона = ');   readln(t);   s: =1/2*h*t;   writeln('площадь = ',s);   end;   if k2=2 then   begin   write('a = ');   readln(a);   write('b = ');   readln(b);   write('c = ');   readln(c);   if tr(a,b,c) then     begin     s: =sq(a,b,c);     writeln('площадь = ',s) ;     end else writeln('треугольник не существует');   end;   end; end. пример:   найти радиус или площадь треугольника? если радиус,то нажмите 1. если площадь, то нажмите 2  2 что вам известно? если а и h, то нажмите 1. если а,b,с то нажмите 2 1 высота = 3 cторона = 4 площадь = 6