Сообщение "весна идёт, весне - дорогу! " записано в кодировке, в которой каждый символ весит 1 байт. определить объем сообщения.​

Var a, b, c, d, k, i, j, n1, n2 : integer;     s: array [1..100,1..100] of integer; procedure swap(a, b : integer; var c, d : integer); var e : integer; begin     c: =b;     d: =a; end; begin     read (n1, n2);     for i: =1 to n1 do          for j: =1 to n2 do            read (s[i,j]);     for j: =1 to n2 do          swap (s[1,j],s[3,j],s[1,j],s[3,j]);     for i: =1 to n1 do      begin          writeln;           for j: =1 to n2 do            write (s[i,j],' ');       end end.      

Ответ: зеленая ручка, синий карандаш, желтый маркер, оранжевый фломастер 1) синий лежит между оранжевым и зеленым т. е. либо "оранжевый, синий, зеленый", либо "зеленый, синий, оранжевый" 2) синий и оранжевый не лежат рядом, значит либо "оранжевый, желтый, синий, зеленый", либо "зеленый, синий, желтый, оранжевый" 3) слева от желтого лежит карандаш, значит "оранжевый карандаш, желтый, синий, зеленый", либо "зеленый, синий карандаш, желтый, оранжевый" 4) маркер и карандаш  не лежат с краю, значит "зеленый, синий карандаш, желтый маркер, оранжевый" 5) фломастер лежит правее ручки и карандаша: "зеленая ручка, синий карандаш, желтый маркер, оранжевый фломастер"