Журналист
Saon 3 ноября 2019 в 05:14

Масса кольца. Вычислить массу кольца по радиусу меньшей окружности R1, радиусу большей окружности R2 и толщине, равной k, сделанного из железа, плотность которого 7,8 г/см^3

Var r1,r2,k,m:real;
begin
write(r1 = ); readln(r1);
write(r2 = ); readln(r2);
write(k = ); readln(k);
m:=pi*(r2*r2-r1*r1)*k*7.8;
writeln(m = ,m:5:2);
end.

Пример:
r1 = 5
r2 = 7
k = 2
m = 1176.21
Компьютеры и вычисления
Для комментирования необходимо зарегистрироваться на сайте