35 ! ] паскаль. первоначально весила 100 кг. ежедневно она скидывала 1% веса. когла она бедет весить менее 80 при решении следует учесть, что время отсчёта не дано (d=

program aaa;   var d, n : integer; begin  write ('введите число n-');   readln (n);   writeln('делители числа: ');   for d : =1 to n do  if n mod d = 0 then writeln (d)end.

1) неопределенность знаний n = 64 - 32 = 32;

2) i = log232 = 5 бит - количество информации;

3) количество бит соответствует количеству вопросов.

ответ: 5 вопросов.