Для графического исполнителя Чертёжник составьте алгоритм построения геометрической фигуры, состоящей из двух простых фигур. Повторите рисование данной фигуры три раз вдоль оси абсцисс. Геометрические фигуры, их взаимное расположение и цвет нужно задать самостоятельно. Построение итогового изображения нужно реализовывать с использованием двухшаговой детализации. На проверку нужно прислать сохранённый файл программы и скриншоты выполнения алгоритмов с отображением кода алгоритма и результатов работы.

Использовать Чертежник

алг клоны одинаковых фигур

нач

нц 3 раза

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

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

геометрическая фигура

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

геометрическая фигура

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

геометрическая фигура

кц

кон

алг геометрическая фигура

нач

фигура 1

фигура 2

кон

алг фигура 1

нач

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

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

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

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

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

кон

алг фигура 2

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

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

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

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

поднять перо

кон

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.