Question

Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d=1200 кг/м3.Составить программу.которая вычисляет давление стольа жидкости на дно сосудов p=dgh(g=9,8 м/с2)

Answer 1

var a, b, c, d, h, i:integer;
begin
read (h);
write (1200*9.8*h);
end.
P.S. Благодарность не помешает.