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

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

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

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.