s = 17108073 GG = 6.6740831 * 10 ^ (-11) M = 10 ^ 12 * s R = s / 1000 g = GG * M / R ^ 2 MsgBox g Vo = Sqr(g * R) MsgBox Vo Ve = Sqr(2 * g * R) MsgBox Ve