24小时热门版块排行榜    

查看: 777  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

w76990480

荣誉版主 (文坛精英)

super-emuch

优秀版主文献杰出贡献文献杰出贡献

[求助] 将前5行最后一个数与第6行的最后一个数相同

将前5行最后一个数与第6行的最后一个数相同

1.000000     2.130000     7.380000    25.000000     3.550000     7.368000    25.000000
  2.000000     2.841000     6.150000    25.000000     3.550000     7.368000    25.000000
  3.000000     4.282000     6.209000    25.187000     3.550000     7.368000    25.062330
  4.000000     2.841000     8.610000    25.000000     3.550000     7.368000    25.046750
  5.000000     4.286000     8.605000    25.294000     3.550000     7.368000    25.096200
  6.000000     4.977000     7.409000    25.500000     3.550000     7.368000    25.163500
  1.000000     2.841000     8.610000    25.000000     3.550000     9.824000    25.000000
  2.000000     4.286000     8.605000    25.294000     3.550000     9.824000    25.147000
  3.000000     2.841000    11.070000    25.000000     3.550000     9.824000    25.098000
  4.000000     4.278000    11.021000    25.468000     3.550000     9.824000    25.190500
  5.000000     2.130000     9.840000    25.000000     3.550000     9.824000    25.152400
  6.000000     4.999000     9.776000    25.658000     3.550000     9.824000    25.236670
  1.000000     2.130000    12.300000    25.000000     3.550000    12.280000    25.000000
  2.000000     2.841000    11.070000    25.000000     3.550000    12.280000    25.000000
  3.000000     4.278000    11.021000    25.468000     3.550000    12.280000    25.156000
  4.000000     4.974000    12.250000    25.813000     3.550000    12.280000    25.320250
  5.000000     2.841000    13.530000    25.000000     3.550000    12.280000    25.256200
  6.000000     4.340000    13.498000    25.590000     3.550000    12.280000    25.311830
  1.000000     2.841000    13.530000    25.000000     3.550000    14.736000    25.000000
  2.000000     4.340000    13.498000    25.590000     3.550000    14.736000    25.295000
  3.000000     2.841000    15.990000    25.000000     3.550000    14.736000    25.196670
  4.000000     4.270000    15.997000    25.798000     3.550000    14.736000    25.347000
  5.000000     2.130000    14.760000    25.000000     3.550000    14.736000    25.277600
  6.000000     5.005000    14.777000    26.025000     3.550000    14.736000    25.402170


如何编程
回复此楼
专业文献求助
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

w76990480

荣誉版主 (文坛精英)

super-emuch

优秀版主文献杰出贡献文献杰出贡献

引用回帖:
2楼: Originally posted by leigp at 2013-03-23 22:54:41
设置一个二维数组,将这个文件读入到程序中,第六行最后一个的标号知道了就能让其他的数值变成他了

初学fortran,能不能给个例子,弄了一下午二维数组,读进去的数,在不经任何转换输出都不行
专业文献求助
3楼2013-03-24 13:20:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

leigp

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
w76990480: 金币+5, ★有帮助 2013-03-24 13:20:55
设置一个二维数组,将这个文件读入到程序中,第六行最后一个的标号知道了就能让其他的数值变成他了
希望多向各位学习!
2楼2013-03-23 22:54:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

leigp

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
w76990480: 金币+10, ★★★很有帮助, 感谢再次回复,我晚上在试一下 2013-03-24 18:43:45
w76990480: 金币+55, ★★★★★最佳答案 2013-03-24 18:45:54
要不就设置成几个一维数组,一列用一个数组表示,这样的话首先你得知道你文件中有几列。
DO i=1, N   (n为行数,如果后面的行对你没用,可以将N改为6)
     read(11,*) num1(i),num2(i),num3(i),num4(i),num5(i),num6(i),num7(i)
END DO
DO i=1,5
    num7(i)=num7(6)
END DO
希望多向各位学习!
4楼2013-03-24 18:30:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[职场人生] 40+中年人失业后,还能找到好工作吗? +11 xqy2009 2026-10-13 13/650 2026-10-15 21:32 by bear2007
[有机交流] 用NBS溴化时溶剂除了CCl4外还有什么 +3 18834002860 2026-10-12 6/300 2026-10-15 14:30 by 长沙摩尔信息科�
[硕博家园] 极限拉扯,如何抉择 +11 Isak0320 2026-10-12 15/750 2026-10-14 21:55 by 猫鱼不是鱼
[论文投稿] 二审4个多月了还是Awaiting Reviewer Scores 10+3 纳斯达克ML 2026-10-11 4/200 2026-10-14 17:30 by babero
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +8 wangyl_123 2026-10-10 13/650 2026-10-14 15:12 by zuesli
[教师之家] 课题组会帮你通过考核么? +4 好运来~9527 2026-10-10 7/350 2026-10-13 08:41 by xli1984
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
信息提示
请填处理意见