Определим объем памяти на 1 лыжника. Лыжников 240, т.е. K=240. 240 – не степень числа 2. Найдем число, большее 240 и являющееся степенью 2.
var s:string;
i:byte;
begin
writeln('Введите слово:');
readln(s);
writeln;
writeln('Их номера в алфавите:');
for i:=1 to length(s) do
case s[i] of
'А'..'Я' : write(ord(s[i])-1038+' ');
'а'..'я': write(ord(s[i])-1070+' ');
end;
readln
end.
1) t=8 с + 3мбайта/218бит=115440с Из это становиться понятно что если сжать и отправить то будет быстрее!
Если используется 60 различных символов, то для кодирования одного символа требуется log(2)60 ≈ 6 бит
Для кодирование 50 символов нужно 50*6=300 бит
В 16-символьном алфавите на один символ требуется log(2)16=4 бит.
На все сообщение: 2*16*12*4 бит = 16*12 байт = 16*12/1024 Кбайт=0,1875 Кбайт