РЕШИТЕ ПОЖАЛУЙСТА!!!!!!!!!! Посудина цилиндрической формы заполнена до краёв водой, d=1200кг/м3. Составить программу которая
5-9 класс
|
вычисляет:
а)давление жидкости на дно посудины по формуле p=dgh(g=9,8м/с2)
б)массу жидкости в каждой посудине m=dV=dhS (S=3,14R2)
в) сумарную массу жидкости
Радиус посудины,высоту столба жидкости нужно вводить с клавиатуры,а результат вывести на экран.
СПАСИБО))))))))
а)
var
p,d,h:real;
begin
readln(h);
p:=1200*9.8*h;
writeln(p);
end.
б)
var
m,h,r:real;
begin
readln(h);
readln(r);
m:=1200*3.14*h*r*r;
writeln(m);
end;
в) необходимы дополнительные условия количество сосудов
если принять количество сосудов за k тогда
var
i,k:integer;
m,h,r,S:real;
begin
readln(k);
S:=0;
for i:=1 to k do
begin
readln(h);
readln(r);
m:=1200*3.14*h*r*r;
S:=S+m;
end;
writeln(S);
end.
Другие вопросы из категории
нумерованного списка.
больше половины огорода (размеры участков после раздела должны быть целыми и участки прямоугольными). Вывести '1' - если участок деда оказался меньше, '0' - если участки равны.
Входные данные:
Во входном потоке в первой строке заданы целые числа A, B (A, B < 1000).
Выходные данные:
Вывести единственное целое число.
Пример входного файла (input.txt):
8 4
Читайте также
жидкости в каждой посудине m=dV=dhS(S=3,14R в квадрате)
Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d= 1200 кг/м (кубический). Составить программу, которая вычисляет:
а) давление столба жидкости на дно сосудов p=dgh (g= 9,8 м/с (в квадрате));
б) массу жидкости в каждом сосуде m=dV=dhS (S=3,14R (в квадрате));
в) суммарную массу жидкости.
на дно сосудов p=dgh( g=9,8м\с²)
6 сосудов( высота 1сосуда 7, высота 2 сосуда 4, высота 3 сосуда 10, высота 4 сосуда 6, высота 5 сосуда 5, высота 6 сосуда 3)
сосудов p=dgh(g=9,8 м/с2)
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.