Fortran のエラー

質問

9002700385647,2,0,1,0,915110373,20050524,0,2,4911
9004300501590,1,0,1,0,910410489,20050630,-1,1,4527
このようなデータ1万人分必要なところだけ読み取って
書き出そうとするのですがうまくいきません。
　This application has requested the Runtime to terminate it
in an unusual way. とエラーメッセージが出ます。なぜでしょうか。
―――――――――――――――――――――――――――――――
OPEN (1,FILE='OKAMOTODA.TXT',STATUS='OLD')
OPEN (2,FILE='NEWNEW.TXT',STATUS='NEW',
1 FORM='FORMATTED')
II=0
31 READ(1,*,END=900)K1,K2,K3,K4,K5,K6,K7,K8,K9,K10
II=II+1
WRITE(2,991) II,K1,K2,K3,K4,K5
991 FORMAT(2X,I3,5I20)
IF(II .LT. 10000) THEN
GOTO 31
ELSE
GOTO 900
ENDIF
900 CLOSE(1)
CLOSE(2)
END
―――――――――――――――――――――――――――――――

回答No.2

nagare

コンパイラも実行環境もないですが

integer(整数型)の範囲は「-2147483648～2147483647」なので、変数K1がOVERFLOWしていると思います

変数K1はcharacter型かdouble precision型でないとダメだと思います。

回答No.1

osamuy

K1とK6が32bit整数だからとか。

お礼

数値の大きさまでは全く気にしないで居ました。
今度改めて参考書を見ると基礎の基礎でした。
ご指摘ありがとうございました。
定年になり昔取り組んだプログラムを引っ張り出して
勉強始めたところです。
今後ともよろしくお願いいたします。

補足

32bitだとどんな影響があるのですか。