Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Определить силу притяжения между телами массой M1 и M2,находящимися на расстоянии R.ПАСКАЛЬ

Ответ оставил Гость

Var m1,m2,R:real;
Begin
Write(m1 = );ReadLn(m1);
Write(m2 = );ReadLn(m2);
Write(R = );ReadLn(R);
Write(F = ,0.0000000000667*(m1*m2)/(R*R))
End.