Сосуды цилиндрической формы заполнены до краев жидкостью плотностью d=1200 кг/м 3.…

Question

50

Сосуды цилиндрической формы заполнены до краев жидкостью плотностью d=1200 кг/м 3. Составьте программу в Pascal ABC которая найдет суммарную массужидкости.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

volandovich · Accepted Answer

96

volandovich

20 апреля 2023

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln ('Введите радиус'); readln (r); writeln ('Введите высоту'); readln (h); v: =3,14*sqr (r)*h; m: =1200*v; writeln (',m: 2:2,' кг'); readln; end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: