Водной из кодировок unicode каждый символ кодируется 2 байтами.
вова написал текст: "к семейству тыквенные относят около 700 видов растений, среди них тыква, дыня, огурец, кабачок, патиссон, лагенария, кассабанана".
затем вова вычеркнул из списка название одного из растений.
при этом размер нового предложения в данной кодировке оказался на 160 бит меньше.
как вычислить , определить вычеркнутое слово? , .

+2): 3+4): 5+6): 7+8): 9=1

var

  i: integer;

  a: array[1..16]of integer;

begin

  for i: =1 to 16 do

begin

  a[i]: =random(40)-20;

  if a[i] mod 3=0 then write(i,' ');

end;

writeln;

end.

var

  s: string;

  z,z1,i: integer;

begin

  readln(s);

z: =0;

z1: =0;

  for i: =1 to length(s) do

  begin

  if s[i]='м' then inc(z);

  if s[i]='н' then inc(z1);

  end;

if z> z1 then writeln('больше букв м');

if z< z1 then writeln('больше букв н');

if z=z1 then writeln('букв м и н равное количество');

end.

по центру каждой стены  по  стулу  а также в каждый угол по стулу