Составьте программку я которая вычисляет: массу жидкости в каждом сосуде m

Составьте программку я которая вычисляет: массу воды в каждом сосуде m = dV = dhS(S = 3.14 R во 2-ой ступени)
Требуемые начальные данные (радиус сосуда R, вышина столбца воды h) вводятся в массив с клавиатуры, результат выводится на экран. Язык - Pascal

Задать свой вопрос
Ванек
Это всё одна формула?
Виталик Лукьяшенко
"m = dV = dhS(S = 3.14 R во 2-ой ступени)"
Владислав Безлобов
Либо поначалу m=dv -> v=hs -> S = 3.14 R во второй ступени
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.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт