Предмет: Информатика,
автор: es3n1n
Составьте программу я которая вычисляет: массу жидкости в каждом сосуде m = dV = dhS(S = 3.14 R во второй степени)
Требуемые исходные данные (радиус сосуда R, высота столбца жидкости h) вводятся в массив с клавиатуры, результат выводится на экран. Язык - Pascal
Sost:
Это всё одна формула?
Ответы
Автор ответа:
1
program Zanija;
var m,d,V,h,S,R:real;
begin
Writeln('Введите радиус (R) ');
readln(R);
Writeln('Введите высоту столбца жидкости (h) ');
readln(h);
Writeln('Введите (d) ');
readln(d);
S:= 3.14 * sqr(r);
v:= h*s;
m:=d*V;
writeln('Масса жидкости в каждом сосуде = ',m);
End.
Интересные вопросы
Предмет: Химия,
автор: nikitber2007
Предмет: Английский язык,
автор: anastasiagetalo508
Предмет: Химия,
автор: H0LIMAN
Предмет: Алгебра,
автор: BIG55Banana1
Предмет: Математика,
автор: Александр19721