Program
         MoonFlight;

Uses
         Crt , Dos , Graph;

Const
         Gamma     = 6.67E - 11;
         EarthMass = 5.978E + 24;
         EarthRad  = 6.371E + 6;
         MoonMass  = 7.35E + 22;
         MoonRad   = 3.8444E + 8;
         ShipMass  = 2E + 4;
         EngForce  = 3.5E + 4;
Var
         X , Y : Integer;