В одной из кодировок каждый символ кодируется 7 битами. Вова написал текст (в нем нет лишних пробелов) "Уж, рак, крот, кошка, собака, кашалот, динозавр, джунгарик - дикие животные".
Ученик вычеркнул из списка название отдного из животных. Заодно он вычеркнул ставшие лишними запятые и пробелы - два пробела не должны идти подряд. При этом размер нового предложения оказался на 7бит меньше
147
419
Ответы на вопрос:
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.
Популярно: Информатика
-
Aron9117.12.2020 03:16
-
aylinlove27.09.2020 04:22
-
aandrey33602.09.2021 19:39
-
Ivankozyr69gmail24.10.2020 12:54
-
танкистка710.01.2021 17:28
-
041208katy09.08.2022 21:30
-
Гудивзь09.05.2020 02:15
-
iljapradunp06w1127.10.2022 09:17
-
tetyanavasil16.04.2023 02:18
-
weloyda27.01.2021 23:10