В одной из кодировок Unicode каждый символ кодируется 16 битами.
При подготовке доклада по биологии Вова написал текст (в нем нет лишних пробелов):
"Многие плодовые деревья и кустарники ботаники относят к семейству Розоцветные: айва, вишня, яблоня, миндаль, шиповник, терновник."
Затем Вова вычеркнул из списка название одного из растений. Заодно он вычеркнул ставшие лишними запятые и пробелы - два пробела не должны идти подряд.
При этом размер нового предложения в данной кодировке оказался 14 байт меньше, чем размер исходного предложения. Напишите в ответе вычеркнутого растения.

Каждый символ кодируется 16 битами, т.е. 16 / 8 = 2 байтами. Вова вычеркнул 14 байт (мы сделали вывод из того, что после вычеркивания текст стал "весить" на 14 байт меньше), т.е. 7 символов (включая слово, запятую и пробел). Мы сделали такой вывод, потому что вычеркнутые символы весят 14 байт, мы делим вес этих символов на вес одного (2 байта) и получаем, что Вова вычеркнул 7 символов. Из этих семи символов удаляем лишний символ пробела и запятой: 7 - 2 = 5. 5 — длина самого слова. В списке растений есть только одно слово из 5-ти букв: вишня.

ответ: вишня

program xxx;

var n, c, d, e, k : integer;

begin

  wtite ('введите 3-х значное число n =');

  readln (n);

  c : = n div 100;

  d : = (n div 10) mod 10;

  e : = n mod 10;

  k: = 100*e + 10*d + c;

  if n = k then write ('палиндром') else write('не палиндром')

end.

1.123456789-номер телефона

2.мама помыла посуду-ткстовая информация

3.какой нибудь рисунок

4.музыка

5.кино