Program gt; var i, n: integer; a,min,p: real; begin read(n); read(a); p: =1; for i: =1 to n do begin p: =-a*p; if(p< min)or(i=1)then min: =p; end; writeln(min); end.
Спасибо
Ответ дал: Гость
1) неопределенность знаний n = 64 - 32 = 32;
2) i = log232 = 5 бит - количество информации;
3) количество бит соответствует количеству вопросов.
Популярные вопросы