Находим количество символов : 256*160*32=1310720 символов. I=i*k. Дальше , зная i, подставляешь в формулу k=1310720 и находишь информационный объём.
Интернет,книга,газета,короче это тот объект отку берут инфо
//PascalABC.Net 3.2
begin
var count:=0;
var a:=ReadArrReal('Вводите', readinteger('Кол-вo элементов: '));
for var i:=1 to length(a)-1 do if a[i]=a[0] then inc(count);
write (count)
end.
354=01100010
872=010101101000
648=010001000
931=110100011
Я тоже в интернет урок. Какой класс???