Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d=1200 кг/м^3 Составить программу которая вычисляет давление столба жидкости на дно сосудов p=d*g*h (g=9.8 м/с^2); h вводится в массив с клавиатуры, результат ...
Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью 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.
Не нашли ответ?
Похожие вопросы