Напишите программу, которая получает три числа -
рост трёх спортсменов, и выводит сообщение «По
росту.», если они стоят по возрастанию роста, или
сообщение «Не по росту!», если они стоят не по
росту.
Пример:
Введите рост трёх спортсменов:
165 170 172
По росту.
Пример:
Введите рост трёх спортсменов:
175 170 172
Не по росту!

ответ: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.

Объяснение:

по формуле n= найдем, сколько было круглых фигурок -  = 4; всего фигурок было 15+4=19. ответ: 19

2^i = 128

i = 7 бит

800 * 7 = 5600 бит

5600 : 8 = 700 байт

700 : 1024 = 0,684 килобайт.