Средняя скорость чтения учащихся 9-11 классов составляет:160 слов/минуту (одно слово-в среднем -6 символов).За 4 часа непрерывного чтения ученик успеет переработать (килобайт)

как через Var написать?

???

через программу паскаль.там должно быть var integer begin

beginwriteln('Объем переработанной информации = ',4*60*160*6,' байт = ',4*60*160*6/1024,' Кбайт');end.

Если для кодирования одного символа используется 8 бит = 1 байт, то:Количество прочитанных символов = 4*60*160*6;объем информации = 4*60*160*6*1 байт = 4*60*160*6/1024 Кбайт = 225 Кбайт

var    capacity: real;begin    capacity := 4 * 160 * 60;    writeln('Слов за 4 часа = ', capacity);    {пробелы тогда тоже считаем}    capacity := capacity * (6 + 1);     writeln('Символов за 4 часа = ', capacity);    capacity := capacity;     writeln('Байт за 4 часа = ', capacity);    capacity := capacity / 1024;     writeln('Кбайт за 4 часа = ', capacity);end.ВыводСлов за 4 часа = 38400Символов за 4 часа = 268800Байт за 4 часа = 268800Кбайт за 4 часа = 262.5А вобще применять битовое определение символов как подсчет кол-ва информации перерабатываемой человеком - в корне не верно