9класс. информатика. сосуды цилиндрической формы заполнены до краев жидкостью плотностью d=1200кг/м в кубе. составьте программу, которая вычесляет: а) давление столба жидкости на дно сосудов p=dgh(g=9,8м/с в квадрате); б)массу жидксоит в кажом сосуде m=dv=dhs (s=3,14r в квадрате) в)суммарную массу жидкости . h и r дано
var d,p,g,h,r,s,m:real;
begin
D:=1200;
g:=9.8;
s:=3.14*r;
Write('vvedite H i R zceres probel:');
readln(h,r);
p:=d*g*h;
m:=d*h*s;
end.
это для а и б,а что касается и то нужно знать сколько всего сосудов.