a := F / m1; //m1 - масса тела
F = G * m1 * m2 / (r*r)//m2 - масса планеты
//Подставляем F в выражение a:
a := (G * m1 * m2 / (r*r)) / m1;
a := G * m2 / (r*r);