>>914
>一個の質点とそれ以外の質点が相互作用するプログラムになっちゃった。
しか読んでない。

if (i==j)
Fx[i]+=0;
else
Fx[i]+=(a/dis[i][j])*res_x[i][j];

Fy も同じ処理で
こうするとどうなる？