Сообщение занимает 2 страницы и содержит 1/16 кбайта информации.на каждой странице записано 256 символов. какое количество информации несет одна буква использованного алфавита?
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016 begin var s:=ReadInteger('n=').ToString.JoinIntoString(''); Writeln('Цифр в числе- ',s.Length); Writeln('Сумма цифр- ',s.Select(d->Integer.Parse(d)).Sum); Writeln('Последняя цифра- ',s.Last); Writeln('Первая цифра- ',s.First); Writeln('Предпоследняя цифра- ',s[s.Length-1]); var m:=ReadInteger('m='); Write('Сумма ',m,' последних цифр числа- '); Writeln(s.Skip(s.Length-m).Select(d->Integer.Parse(d)).Sum); Write('Цифра 3 в запись числа '); if Pos('3',s)>0 then Writeln('входит') else Writeln('не входит'); Writeln('Число в обратном порядке- ',s.Reverse.JoinIntoString('')); Writeln('Перестановка первой и последней цифр- ', s.Last+Copy(s,2,s.Length-2)+s.First); end.
Тестовое решение: n= 1063 Цифр в числе- 4 Сумма цифр- 10 Последняя цифра- 3 Первая цифра- 1 Предпоследняя цифра- 6 m= 2 Сумма 2 последних цифр числа- 9 Цифра 3 в запись числа входит Число в обратном порядке- 3601 Перестановка первой и последней цифр- 3061
Преобразуем условие в более понятное. Обозначаем: a=Первая буква согласная; b=Вторая буква согласная c=Третья буква гласная Тогда условие можно записать следующим образом: Перейдем к исходным обозначениям, учтя, что отрицание "гласная" есть "согласная", а отрицание "согласная" есть "гласная": (Первая буква гласная ИЛИ Вторая буква гласная) И Третья буква согласная. Можно сформулировать еще короче: "Первая ИЛИ вторая буква гласная, а третья обязательно согласная". Этому условию удовлетворяет только имя 4) Лидия - в нем вторая буква гласная, а третья согласная.
i=2^9/(256*2)=2^9/2^9=1 бит
N=2^i=2^1=2 символа.