素数発見プログラム

コンパイルオプションを少しつければ、一応最低2Gくらいまでは出ます。
もしコンパイルが通らなければ
"fopen(&fp[P],Filename[P],"w");"を"fp[P]=fopen(Filename[P],"w");"にしてください。
あとこれもう少し高速化可能。