Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d=1200кг\м³. составьте программу, которая вычисляет давление столба жидкости на дно сосудов p=dgh( g=9,8м\с²) 6 сосудов( высота 1сосуда 7, высота 2 сосуда 4, высота 3
сосуда 10, высота 4 сосуда 6, высота 5 сосуда 5, высота 6 сосуда 3)
const
a:array[1..6]of longint=(7,4,10,6,5,3);
var
i:longint;
begin
for i:=1 to 6 do write(9.8*a[i]*1200,' ');
writeln;
end.