Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d=1200 кг/м^3 Составить программу которая вычисляет давление столба жидкости на дно сосудов p=d*g*h (g=9.8 м/с^2); h вводится в массив с клавиатуры, результат выводится на экран.
Const d=1200; var h,p:real; begin writeln('Высота столба жидкости (в метрах): '); readln(h); p:=9.8*d*h; writeln('Ответ: ',p,' Па') end.