РЕШИТЕ В ПАСКАЛЕ: Найти силы притяжения F:=G*m1*M/R^2 двух тел, если G=9.81 м/с2, M=5,94х1024 кг, m1=500кг, а расстояние R=2,3, …10 км.
РЕШИТЕ В ПАСКАЛЕ: Найти силы притяжения F:=G*m1*M/R^2 двух тел, если G=9.81 м/с2, M=5,94х1024 кг, m1=500кг, а расстояние R=2,3, …10 км.
Гость
Ответ(ы) на вопрос:
Гостьconst
G = 9.81;
M = 5.94*1024;
m1 = 500;
var r: integer;
f: real;
begin
for r := 2 to 20 do begin
f := G * m1 * M / sqr(R*1000);
writeln (r:2, 'км => ', f:5:5, ' Н');
end;
end.
Не нашли ответ?
Похожие вопросы