Разработать, ввести в ЭВМ и отладить программу для расчёта высоты

читального зала библиотеки, если известны длина и ширина зала, число читателей

и норма объёма воздуха на человека.

Program HallHeight;

Var a, b, d, V: Integer;

c: Real;

Begin

Write ('Длина зала = ');

ReadLn (a);

Write ('Ширина зала = ');

ReadLn (b);

Write ('Количество читателей = ');

ReadLn (d);

Write ('Норма объема воздуха на человека = ');

ReadLn (V);

c : = (V * d) / a / b;

WriteLn ('Высота зала равна ', c:5:2);

ReadLn;

End.