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

Вопрос от посетителя:

Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью 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.

 

Добавить свой ответ