Есть ответ 👍

В одной из кодировок каждый символ кодируется 7 битами. Вова написал текст (в нем нет лишних пробелов) "Уж, рак, крот, кошка, собака, кашалот, динозавр, джунгарик - дикие животные".
Ученик вычеркнул из списка название отдного из животных. Заодно он вычеркнул ставшие лишними запятые и пробелы - два пробела не должны идти подряд. При этом размер нового предложения оказался на 7бит меньше

147
419
Посмотреть ответы 1

Ответы на вопрос:

starceva83
4,6(63 оценок)

var  max, c,t, count: integer; begin  write('c = ');   readln(c);     t : = c;   max : = t mod 10;   while t < > 0 do  begin      if max < t mod 10 then          max : = t mod 10;       t : = t div 10;   end;     t : = c;   count : = 0;   while t < > 0 do  begin      if t mod 10 = max then          count : = count + 1;       t : = t div 10;   end;     writeln('count = ', count);   readlnend. 

Популярно: Информатика