24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1590  |  回复: 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的回帖
相关版块跳转 我要订阅楼主 踏步青云 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 279求调剂 +3 傅文秋 2026-04-02 3/150 2026-04-02 13:05 by 1753564080
[考研] 265求调剂11408 +4 刘小鹿lu 2026-03-27 4/200 2026-04-02 11:27 by guyan1000
[考研] 337求调剂 +11 《树》 2026-03-29 11/550 2026-04-02 10:20 by 不吃魚的貓
[考研] 【求调剂】新能源材料本科,一志愿211,初试321 +6 求调剂学校, 2026-04-02 6/300 2026-04-02 09:41 by 晴空210210
[考研] 336求调剂 +5 kiyy 2026-04-01 5/250 2026-04-02 07:14 by chixmc
[考研] 266分求材料化工冶金矿业等专业的调剂 +7 哇呼哼呼哼 2026-03-26 7/350 2026-04-01 20:47 by cqupH
[考研] 材料专硕调剂 +17 椰椰。 2026-03-29 17/850 2026-04-01 20:44 by cq2548
[考研] 286求调剂 +5 Sa67890. 2026-04-01 7/350 2026-04-01 19:50 by 6781022
[考研] 285求调剂 +7 AZMK 2026-03-30 13/650 2026-04-01 17:00 by 七度不信任
[考研] 环境工程 085701,267求调剂 +15 minht 2026-03-29 16/800 2026-04-01 10:13 by li_sujuan99
[考研] 326求调剂 +4 崽崽仔 2026-03-31 4/200 2026-04-01 09:58 by 我的船我的海
[考研] 土木304求调剂 +3 兔突突突, 2026-03-31 3/150 2026-04-01 09:42 by JourneyLucky
[考研] 289求调剂 +7 BrightLL 2026-03-29 7/350 2026-03-31 22:05 by 544594351
[考研] 375求调剂 +7 雨夏整夜 2026-03-29 7/350 2026-03-31 18:52 by xhai2011
[考研] 286求调剂 +6 Faune 2026-03-30 6/300 2026-03-31 14:37 by jp9609
[考研] 生物考研337分求调剂 +4 cgxin 2026-03-30 6/300 2026-03-31 14:18 by 记事本2026
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[有机交流] 考研调剂 +8 watb 2026-03-26 8/400 2026-03-30 18:40 by 544594351
[考研] 295求调剂 +5 wei-5 2026-03-26 5/250 2026-03-30 08:34 by 探123
[考研] 315调剂 +4 0860求调剂 2026-03-26 5/250 2026-03-27 11:23 by wangjy2002
信息提示
请填处理意见