Рассмотри Бытовые предметы с геометрическими узорами на рисунке • Придумай для них названия.• Опиши выбранный узор 5-6 предложениями в тетради.• Набери предложения в текстовом редакторе.под именем «Узоры».• Вставь созданный орнамент в текстовый редактор и сохрани этoт фar​

Создаёшь в папке с программой два текстовых файла с именами "1.txt." и "output.txt". В первый записываешь 8 чисел без пробелов и запятых ("22031991", например).

type  matrix = array [1..8] of integer;var  F, output: text;  i, n, cc, sum: integer;  c: char;  x: matrix;  ma: real;
procedure convert (var c: char; var cc: integer);begin  if c='1' then cc:=1;  if c='2' then cc:=2;  if c='3' then cc:=3;  if c='4' then cc:=4;  if c='5' then cc:=5;  if c='6' then cc:=6;  if c='7' then cc:=7;  if c='8' then cc:=8;  if c='9' then cc:=9;  if c='0' then cc:=0;end;
procedure sorting (n: integer; x: matrix);begin  for n:=1 to 7 do begin    if x[n]>x[n+1] then swap(x[n],x[n+1]);  end;end;
begin  Assign(F, '1.txt');  Reset(F);  for i:=1 to 8 do begin    read(F, c);    convert(c,cc);    x[i]:=cc;  end;  Close(F);
  sorting(n,x);  sum:=x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8];  ma:=sum/8;    Assign(output, 'output.txt');  rewrite(output);  writeln(output, sum); writeln(output, ma);  Close(output);end.

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

алг  

нач

поднять перо

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

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

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

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

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

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

поднять перо

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

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

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

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

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

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

поднять перо  

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

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо

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

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

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

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

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

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

поднять перо

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

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо  

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

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

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

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

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

поднять перо  

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

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

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

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

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

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

поднять перо

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

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

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

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

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

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

поднять перо

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

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

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

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

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

поднять перо

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

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

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

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

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

кон

Объяснение: