| 查看: 518 | 回复: 2 | |||
| 本帖产生 1 个 程序强帖 ，点击这里进行查看 | |||
[交流]
【求助】紧急求助FORTRAN运行问题
|
|||
|
附件中是一个简单的fortran90程序，在fortran powerstation 4.0 中编译运行正常，但在compaq visural fortran 6.0中，编译提示没有错误，但在运行时总会出错，无法进行，请高手帮忙！急！！！ 程序见附件 |
回复此楼» 猜你喜欢
免疫学博士有名额，速联系
已经有9人回复
-
退学或坚持读
已经有13人回复
-
国家基金申请书模板内插入图片不可调整大小?
已经有8人回复
-
多组分精馏求助
已经有6人回复
-
国家级人才课题组招收2026年入学博士
已经有6人回复
-
交叉科学部支持青年基金，对三无青椒是个机会吗？
已经有7人回复
-
青椒八年已不青，大家都被折磨成啥样了？
已经有15人回复
» 抢金币啦！回帖就可以得到:
-
哈尔滨工程大学青岛创新发展基地招聘青年教师
+1/469
-
电力全国重点实验室双一流A类长江学者团队招2026年全日制博士1-2名/博士后
+2/92
-
【2026/2027 哈工大计算机类博士招生】
+1/78
-
【2026/2027 哈工大计算机类博士/硕士招生】
+1/74
-
“超分子材料交叉研究团队”联合诚聘博士后 [清华/吉大/复旦/北大]
+1/74
-
西北工业大学民航学院招博士与硕士复合材料方向
+1/72
-
[求助] 半导体物理PPT课件 东华理工机电学院 彭新村老师
+1/71
-
山东科技大学招聘化学化工博士博士后
+1/42
-
科罗拉多大学 Congjun Yu 课题组招聘
+1/36
-
意大利米兰理工大学急聘CSC公派留学博士生（物理或无机材料科学方向）
+2/30
-
【博士招生】哈工大（深圳）智能学部机器人与先进制造学院 陆文杰老师课题组
+1/16
-
邵阳学院食品与化学工程学院硕士调剂
+1/10
-
诚征女友，非诚勿扰
+3/8
-
2026年天津大学杰青团队招收化学合成、计算机和器件的方面博士
+1/8
-
M200-A摩擦磨损试验机
+1/8
-
海南大学国家优青团队招聘“AI/大数据+材料”方向师资博后
+1/4
-
顾敏院士课题组招收2026级光学工程专业博士研究生-上海理工大学智能科技学院
+1/3
-
苏州大学医学院纳米生物医学方向招收申请考核制博士生1名
+1/1
-
《中华人民共和国危险化学品安全法》分享
+1/1
-
国家杰青低维材料与器件力学团队招收博士研究生
+1/1
★ ★ ★
panjunxing(金币+10): 非常感谢！ 2011-03-03 19:46:28
余泽成(金币+3, 程序强帖+1): 谢谢参与应助！欢迎常来程序语言版！ 2011-03-06 22:06:34
panjunxing(金币+10): 非常感谢！ 2011-03-03 19:46:28
余泽成(金币+3, 程序强帖+1): 谢谢参与应助！欢迎常来程序语言版！ 2011-03-06 22:06:34
|
请按照下面把其中一个函数改一下 subroutine init1() use base integer::i,j,idum real::ra,ran2 idum=123 do i=0,n do j=0,n ra=ran2(idum) fei_old(i,j)=0.01*(2.0*ra-1.0)-0.0 END DO END DO end subroutine ========= fortran编程最好在主程序开始前及每个子程序开始时定义变量之前加入 implicit none 这样如果程序变量定义不恰当，编译器会指出来。 |
2楼2011-03-03 19:08:32
3楼2011-03-03 19:10:22