Var months: array [1..12] of string;
x: integer;
begin
months[1] := 'January';
months[2] := 'February';
months[3] := 'March';
months[4] := 'April';
months[5] := 'May';
months[6] := 'June';
months[7] := 'July';
months[8] := 'August';
months[9] := 'September';
months[10] := 'October';
months[11] := 'November';
months[12] := 'December';
read(x);
if ((x < 1) or (x > 12)) then begin
write('Error!');
end else begin
write(months[x]);
end;
end.
Бгиииии дега. Лчщвькллвьяжяд38287#;@&
[email protected]*1*#&'сшррп,бял73718183837376аьвьвлсшсшашвлядйдфщ 272&17 вьвллыц 77.
Префиксный код, допускающий однозначное декодирование, соответствует условию Фано: "Ни одно кодовое слово не может быть началом другого слова".
Даны коды 101, 01, 11.
Код буквы А не может быть 0 или 1, так как в этом случае он будет началом кодов других букв.
Рассмотрим двузначные коды: 00 01 10 11
01 10 и 11 не подходит, так как это начала других букв (или сами буквы), зато подходит код 00, причем он кратчайший и наименьший.
Ответ: 00
Слова "Кабачок" и "Морковь" сами по себе имеют одинаковое количество букв, когда мы их уберем из текста, то пропадут 14 букв + 2 пробела и 2 запятые, затем посчитаем сколько в тексте символов, а их 67.
Каждый символ весит по 2 байта, значит информационный объём всего текста равен 67 * 2 = 134 Байта
134 - 18 * 2 = 98 Байт
Ответ: 98 Байт информационный объём исходного текста.
