24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1588  |  回复: 2

踏步青云

银虫 (小有名气)

[求助] 求助各位才子们,为什么FROTRAN程序总是出现Program exception-access violation 错误 已有2人参与

1.CHARACTER*60 NAME,CASE(12)
2.CHARACTER*2 NAWP(50)                           
3.  INTEGER NUMC(3,20),NUMP(3),ITY
4.    COMMON/WOU1/ MP,NOP(50),UU(10,121)
5. COMMON /OUV/M,CASE
6.OPEN(49,FILE='NONEVT')
7. J2=0  
8.          DO 33 I=1,2                                                
9.       READ(49,501) ITY                                               
10.       READ(49,501)NUMC(1,I)     
11.       READ(49,502) NAME                                            
12.       READ(49,502) CASE(M)                                         
  13.      J1=J2+1                                                   
  14.      J2=J1+NUMC(1,I)-1                                            
  15.      DO 88 J=J1,J2                                                
  16.      READ(49,503)NAWP(J),NOP(J)                                      
   17.     READ(49,504) (UU(J,K),K=1,121)
88     CONTINUE         
33      CONTINUE
501    FORMAT(I4)
502    FORMAT(A60)                                                  
503    FORMAT(A2,I4)                                                
504    FORMAT(10(F9.5,1H,),F9.5)                                                               
       END      
程序如上所示,我的NONEVT文件在下面,请大家帮我看一下,编译链接都没有问题,但是运行出来总是出错误,显示
forrt1:severe<157>rogram Exception-access violation
press any key to continue
NONEVT文件如下:
   1
   2
   1
   2
SFPSZ10-120000/220                                          
A :入波点,      最大分接                                   
GX  10
  0.00000,  0.53625,  0.68618,  0.72243,  0.72558,  0.71940,  0.71095,  0.70200,  0.69284,  0.68354,  0.67443
  0.66594,  0.65819,  0.65093,  0.64369,  0.63604,  0.62796,  0.61986,  0.61248,  0.60648,  0.60223,  0.59973
  0.59877,  0.59914,  0.60079,  0.60378,  0.60822,  0.61410,  0.62122,  0.62931,  0.63813,  0.64756,  0.65763
  0.66835,  0.67962,  0.69117,  0.70260,  0.71351,  0.72367,  0.73304,  0.74174,  0.74991,  0.75765,  0.76495
  0.77176,  0.77798,  0.78357,  0.78849,  0.79264,  0.79589,  0.79806,  0.79903,  0.79882,  0.79760,  0.79564
  0.79327,  0.79071,  0.78810,  0.78544,  0.78267,  0.77973,  0.77657,  0.77317,  0.76949,  0.76549,  0.76115
  0.75649,  0.75158,  0.74654,  0.74151,  0.73656,  0.73168,  0.72679,  0.72175,  0.71640,  0.71062,  0.70433
  0.69746,  0.69000,  0.68192,  0.67322,  0.66391,  0.65403,  0.64362,  0.63271,  0.62134,  0.60954,  0.59735
  0.58482,  0.57203,  0.55905,  0.54592,  0.53261,  0.51904,  0.50511,  0.49070,  0.47577,  0.46034,  0.44453
  0.42853,  0.41262,  0.39710,  0.38228,  0.36846,  0.35583,  0.34452,  0.33449,  0.32562,  0.31766,  0.31034
  0.30340,  0.29664,  0.28995,  0.28334,  0.27688,  0.27071,  0.26498,  0.25981,  0.25526,  0.25132,  0.24789
GX  30
  0.00000,  0.11271,  0.14611,  0.15549,  0.16011,  0.16324,  0.16618,  0.16902,  0.17103,  0.17171,  0.17193
  0.17337,  0.17698,  0.18345,  0.19326,  0.20629,  0.22188,  0.23913,  0.25695,  0.27380,  0.28796,  0.29851
  0.30600,  0.31221,  0.31948,  0.32975,  0.34373,  0.36074,  0.37933,  0.39825,  0.41700,  0.43564,  0.45434
  0.47289,  0.49058,  0.50641,  0.51953,  0.52961,  0.53682,  0.54161,  0.54457,  0.54620,  0.54683,  0.54659
  0.54541,  0.54307,  0.53936,  0.53414,  0.52747,  0.51961,  0.51099,  0.50215,  0.49362,  0.48596,  0.47965
  0.47507,  0.47244,  0.47185,  0.47326,  0.47660,  0.48175,  0.48845,  0.49621,  0.50430,  0.51186,  0.51815
  0.52284,  0.52611,  0.52865,  0.53133,  0.53487,  0.53964,  0.54555,  0.55219,  0.55900,  0.56543,  0.57099
  0.57520,  0.57752,  0.57743,  0.57447,  0.56839,  0.55922,  0.54732,  0.53330,  0.51783,  0.50153,  0.48488
  0.46816,  0.45148,  0.43479,  0.41794,  0.40069,  0.38279,  0.36408,  0.34456,  0.32445,  0.30412,  0.28407
  0.26473,  0.24640,  0.22921,  0.21313,  0.19805,  0.18388,  0.17055,  0.15804,  0.14633,  0.13541,  0.12519
  0.11556,  0.10639,  0.09753,  0.08889,  0.08036,  0.07188,  0.06335,  0.05468,  0.04577,  0.03650,  0.02676
   1
   1
SFPSZ10-120000/220                                          
A :入波点,      最大分接                                   
D   28
  0.00000,  0.06569,  0.06142,  0.03617,  0.01496,  0.01399,  0.02967,  0.04502,  0.04645,  0.02868,  0.00021
-0.02337, -0.03178, -0.02512, -0.01372, -0.01027, -0.02044, -0.03995, -0.05799, -0.06482, -0.05851, -0.04536
-0.03499, -0.03353, -0.03967, -0.04620, -0.04541, -0.03450, -0.01727, -0.00129,  0.00747,  0.00839,  0.00622
  0.00735,  0.01536,  0.02866,  0.04191,  0.04978,  0.05045,  0.04653,  0.04283,  0.04288,  0.04663,  0.05064
  0.05074,  0.04484,  0.03429,  0.02277,  0.01379,  0.00844,  0.00511,  0.00086, -0.00628, -0.01596, -0.02588
-0.03342, -0.03745, -0.03892, -0.04001, -0.04249, -0.04641, -0.05015, -0.05154, -0.04937, -0.04411, -0.03754
-0.03147, -0.02662, -0.02229, -0.01704, -0.00986, -0.00094,  0.00844,  0.01668,  0.02290,  0.02736,  0.03112
  0.03520,  0.03980,  0.04418,  0.04717,  0.04790,  0.04640,  0.04341,  0.03990,  0.03636,  0.03261,  0.02800
  0.02200,  0.01462,  0.00652, -0.00142, -0.00856, -0.01479, -0.02047, -0.02602, -0.03152, -0.03661, -0.04069
-0.04330, -0.04438, -0.04428, -0.04345, -0.04214, -0.04022, -0.03732, -0.03310, -0.02756, -0.02105, -0.01412
-0.00723, -0.00054,  0.00603,  0.01265,  0.01932,  0.02579,  0.03164,  0.03649,  0.04014,  0.04264,  0.04417
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jerkwin

专家顾问 (正式写手)

【答案】应助回帖

★ ★ ★ ★
xzhdty: 金币+1, 谢谢参与 2014-03-09 08:56:20
踏步青云: 金币+3, 恩,现在解决了 2014-03-19 10:18:58
数组超界或者输入文件有问题, 数据不够
2楼2014-03-08 23:26:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

学虫dj

金虫 (正式写手)

【答案】应助回帖

★ ★ ★
踏步青云: 金币+3, 恩,现在解决了 2014-03-19 10:19:11
程序异常,存取违规
穷则独善其事,达则兼济天下
3楼2014-03-18 17:15:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 踏步青云 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料专硕322分 +3 哈哈哈吼吼吼哈 2026-04-02 3/150 2026-04-02 10:17 by jp9609
[考研] 一志愿北京科技材料科学与工程288分,求调剂 +7 是辰啊 2026-04-02 7/350 2026-04-02 10:09 by 不吃魚的貓
[考研] 一志愿厦门大学化学工程(专硕)-数二英二406分-求调剂 +5 厦大化工 2026-04-01 5/250 2026-04-02 10:03 by jp9609
[考研] 348环境工程调剂 +3 吴彦祖24k 2026-04-01 3/150 2026-04-02 09:14 by nanaliuyun
[考研] 一志愿南昌大学324求调剂 +11 hanamiko 2026-04-01 11/550 2026-04-02 09:00 by sanrepian
[考研] 一志愿安徽大学计算机科学与技术学硕,331分求调剂 +5 蒋昌鹏qtj 2026-04-01 5/250 2026-04-02 08:10 by fxue1114
[考研] 318求调剂,计算材料方向 +7 吸喵有害笙命 2026-04-01 8/400 2026-04-01 23:54 by 义文wang
[考研] 265求调剂 +3 梁梁校校 2026-04-01 3/150 2026-04-01 22:36 by barlinike
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 22:25 by zhouyuwinner
[考研] 279求调剂 +7 莫xiao 2026-04-01 7/350 2026-04-01 22:05 by 客尔美德
[考研] 275求调剂 +12 waltzh 2026-04-01 12/600 2026-04-01 21:44 by chyhaha
[考研] 化学308分调剂 +13 你好明天你好 2026-03-30 14/700 2026-04-01 16:19 by yanflower7133
[考研] 085600,321分求调剂 +13 大馋小子 2026-03-31 13/650 2026-04-01 12:35 by chemdavid
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 11:35 by wangjy2002
[考研] 生物学296求调剂 +10 汤圆包 2026-03-29 14/700 2026-04-01 10:44 by 求调剂zz
[考研] 一志愿北京科技大学085601材料工程英一数二初试总分335求调剂 +5 双马尾痞老板2 2026-03-31 5/250 2026-04-01 09:04 by oooqiao
[考研] 求收留 +8 1943443204 2026-03-28 8/400 2026-03-31 15:00 by -迷了路啊路
[考研] 081200-11408-276学硕求调剂 +6 崔wj 2026-03-26 6/300 2026-03-29 01:11 by hanserlol
[考研] 305求调剂 +5 哇卢卡库 2026-03-26 5/250 2026-03-27 14:01 by laoshidan
[考研] 315调剂 +4 0860求调剂 2026-03-26 5/250 2026-03-27 11:23 by wangjy2002
信息提示
请填处理意见