>>758
G=6.673*(10**(-11))
この辺は
G=6.673E-11
とするべし。

あと７７なのか９０なのか判然としないが、暗黙の型を破る気ならIMPLICIT NONEを
つけておくほうが吉。

>>766
catだって中では読んで書き出しているだけだろうに