Если я не ошибся, то всё должно быть так :)))
Если непонятно выше посмотрите по картинкам
Дисковод
программатор (редко)
жесткий диск
пожалуй все
Килобиты приводим в килобайты. То есть
Скорость в килобайтах = скорость в килобитах/8
Скорость = 32Килобайт в секунду
приводим время в секунды = 64 секунды
В каждой странице 512 байтов, значит на каждую страницу уйдёт
512/32 = 16 секунд.
64 секунд/16секунд = 4.
4 страницы текста было отправлено
program rost;
var h1,h2,h3: integer;
begin
write ('Введите рост трёх спортсменов');
read(h1,h2,h3);
writeln;
if (h1<h2) and (h2<h3) then
write ('По росту') else
write ('Не по росту');
end.