24小时热门版块排行榜    

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

chenyang11

铁虫 (初入文坛)

[求助] fortran 程序文件名为变量 求救

我有个二维数组,
for h=1,m,1
  for j= 1,n,1
   p(j)=.....
enddo
下面我想输出文件名以变量h 为 类型txt 文件名
程序该怎么写???

end  do


各位大神求指导!!!!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

jerkwin

专家顾问 (正式写手)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
华丽的飘过: 金币+2, 3q 2013-10-16 02:33:50
没看出你这是二维数组
write(Filename, *) h
open(unit=1, file=FileName)
write(1, *)
close(1)
2楼2013-10-15 22:07:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chenyang11

铁虫 (初入文坛)

引用回帖:
2楼: Originally posted by jerkwin at 2013-10-15 22:07:04
没看出你这是二维数组
write(Filename, *) h
open(unit=1, file=FileName)
write(1, *)
close(1)

上面 不是FOR 是 DO ,打错了, h为整数型。
3楼2013-10-15 22:14:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chenyang11

铁虫 (初入文坛)

引用回帖:
2楼: Originally posted by jerkwin at 2013-10-15 22:07:04
没看出你这是二维数组
write(Filename, *) h
open(unit=1, file=FileName)
write(1, *)
close(1)

* 代表什么? 是我要输出的 op 的值吗?
4楼2013-10-15 22:17:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 chenyang11 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿 江南大学 085602 化工专硕 338分求调剂 +14 路痴小琪 2026-04-05 14/700 2026-04-06 07:25 by hmn_wj
[考研] 一志愿211,化学学硕,310分,本科重点双非,求调剂 +13 努力奋斗112 2026-04-04 13/650 2026-04-06 07:13 by jj987
[考研] 085600,321分求调剂 +11 大馋小子 2026-04-04 12/600 2026-04-06 06:29 by houyaoxu
[考研] 302分 085601求调剂推荐 +11 zyx上岸! 2026-04-05 11/550 2026-04-05 22:13 by dongzh2009
[考研] 生物与医药086000调剂一志愿西北农林320分 +3 美美女士 2026-04-03 3/150 2026-04-05 21:55 by 学员8dgXkO
[考研] 求调剂 一志愿西南交通大学085701环境工程 282分 +7 多多爱吃汉堡 2026-04-04 7/350 2026-04-05 19:47 by 福农资环_环境基
[考研] 计算机11408,286分求调剂 +7 木子念晞 2026-04-05 7/350 2026-04-05 19:02 by chy09050039
[考研] 工科08-机械专硕-求调剂 +3 雷欧飞踢 2026-04-02 3/150 2026-04-05 18:49 by 蓝云思雨
[考研] 290求调剂085701 +10 1314捧花 2026-04-02 10/500 2026-04-05 10:19 by Sealedwind
[考研] 353求调剂 +10 MayUxw1 2026-04-03 10/500 2026-04-05 09:23 by 无际的草原
[考研] 一志愿北京化工大学,初试成绩350求调剂 +9 沿岸?贝壳 2026-04-04 14/700 2026-04-05 01:09 by 沿岸?贝壳
[考研] 求生物学调剂 +14 15172915737 2026-04-01 14/700 2026-04-04 20:13 by babysonlkd
[考研] 322求调剂 +6 FZAC123 2026-04-03 6/300 2026-04-03 22:23 by 科研小专家
[考研] 考研调剂 +5 小sun要好运 2026-04-03 5/250 2026-04-03 21:43 by 啵啵啵0119
[考研] 085801 总分275 本科新能源 求调剂 +19 bradoner 2026-04-01 23/1150 2026-04-03 10:07 by linyelide
[考研] 一志愿陕西师范大学生物学317分 +5 1563日。 2026-04-02 5/250 2026-04-03 06:58 by ilovexiaobin
[考研] 07生物学求调剂 一志愿同济大学359分 +3 LAMC. 2026-03-30 3/150 2026-04-02 10:26 by 18828373951
[考研] 322求调剂 +5 熹僖XX 2026-03-31 6/300 2026-04-02 10:08 by 求调剂zz
[考研] 材料专业调剂 +5 啦啦啦哭 2026-03-31 6/300 2026-04-01 16:48 by JourneyLucky
[考研] 288资源与环境专硕求调剂,不限专业,有学上就行 +25 lllllos 2026-03-30 26/1300 2026-04-01 09:52 by 一只好果子?
信息提示
请填处理意见