Uses crt; var a,t,ans:integer; begin read(a); ans:=1; while true do begin t:=a; read(a); if a>t then ans:=ans+1 else break; end; writeln(ans); <span>end.</span>
1) Количество символов - 32; 2ˣ=32 ⇒ x=5 ⇒ ⇒ Один символ кодируется 5 битами; Ответ: 5 бит. 2) 2ˣ=80; x≈6,32193; Округляем до 7 (бит) - один символ кодируется 7 битами; Информационный объём книги равен 7*100*20*30=420000 (бит); 420000 (бит)=52500 байт; Ответ: 52500 байт. 3) N - количество вариантов исхода; N=2ˣ; N=3*3=9; 9=2ˣ; x≈3,16993; Округляем до 4; Ответ: 4 бита.