2)введите номер месяца: 12
введите день: 3
до Нового года осталось: 28 дней
При использовании алфавита из 8 символов для записи одного символа требуется log(2)8 = 3 бита; при использовании алфавита из 16 символов - log(2)16 = 4 бита. Количество информации в первом тексте = K*3, во втором тексте - K*4; соотношение объемов = K*3/K*4 = 0.75, т.е. объем информации в первом тексте меньше, чем объем информации во втором.
program pr;
var
a,b:integer;
begin
readln(a,b);
while(a<=b) do readln(a,b);
writeln(0.5*a*b,', ',a+b+sqrt(a*a+b*b));
end.