24小时热门版块排行榜    

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

1010500

金虫 (小有名气)

[求助] 用FORTRAN读取下面格式数据的各列

用FORTRAN读取下面格式数据的各列,并把第3、6、9、12、15、18列的数据按列输出到*.txt文件中。请给出能运行的代码。谢谢高手帮助!
0  0  0.071959                                                                                                
  1  1  0.065321  1  0  0.029416                                                                                
  2  2  0.058666  2  1  0.041433  2  0  0.002607                                                               
  3  3  0.000000  3  2  0.000000  3  1  0.000000  3  0  0.000000                                                
  4  4  0.058079  4  3  0.051976  4  2  0.050523  4  1  0.004528  4  0  0.000327                                
  5  5  0.064627  5  4  0.045254  5  3  0.058079  5  2  0.006420  5  1  0.000653  5  0  0.000060               
  6  6  0.000000  6  5  0.000000  6  4  0.064627  6  3  0.008304  6  2  0.001041  6  1  0.000129  6  0  0.000014
  7  7  0.012063  7  6  0.070443  7  5  0.038515  7  4  0.000000  7  3  0.000000  7  2  0.000000  7  1  0.000000
  8  8  0.013946  8  7  0.075686  8  6  0.031762  8  5  0.070443  8  4  0.010185  8  3  0.001480  8  2  0.000222
  9  9  0.015837  9  8  0.080466  9  7  0.024980  9  6  0.075686  9  5  0.012063  9  4  0.001965  9  3  0.000340
10 10  0.003674 10  9  0.000000 10  8  0.000000 10  7  0.000000 10  6  0.000000 10  5  0.000000 10  4  0.000482
11 11  0.004321 11 10  0.017732 11  9  0.084852 11  8  0.018161 11  7  0.080466 11  6  0.013946 11  5  0.002494
12 12  0.005003 12 11  0.019631 12 10  0.088896 12  9  0.011312 12  8  0.084852 12  7  0.015837 12  6  0.003065
13 13  0.000000 13 12  0.000000 13 11  0.000000 13 10  0.000000 13  9  0.088896 13  8  0.017732 13  7  0.003674
14 14  0.001854 14 13  0.005718 14 12  0.021535 14 11  0.092631 14 10  0.004440 14  9  0.000000 14  8  0.000000

[ Last edited by 1010500 on 2012-11-22 at 21:15 ]
回复此楼

» 猜你喜欢

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

智能机器人

Robot (super robot)

我们都爱小木虫

找到一些相关的精华帖子,希望有用哦~

科研从小木虫开始,人人为我,我为人人
相关版块跳转 我要订阅楼主 1010500 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] esi高被引论文是不是能对中标有所加分和帮助呢 +4 redcom 2026-04-01 4/200 2026-04-02 10:16 by wqy8563
[考研] 266求调剂 +4 学员97LZgn 2026-04-02 4/200 2026-04-02 09:52 by yulian1987
[考研] 【求调剂】新能源材料本科,一志愿211,初试321 +6 求调剂学校, 2026-04-02 6/300 2026-04-02 09:41 by 晴空210210
[考研] 各位老师好,我的一志愿为北京科技大学085601材料专硕 +13 Koxui 2026-03-28 13/650 2026-04-02 09:35 by 哒哒哒呱呱呱
[考研] 342求调剂 +12 Mary Keen 2026-03-28 13/650 2026-04-01 21:02 by 流情牧豪
[考研] 303分 0807学硕求调剂 +3 TYC3632 2026-04-01 3/150 2026-04-01 19:24 by lwk2004
[考研] 349求调剂 +6 吃的不少 2026-04-01 6/300 2026-04-01 17:55 by JYD2011
[考研] 309求调剂 +19 谁不是少年 2026-03-29 19/950 2026-04-01 15:47 by jp9609
[考研] 英一数二生物信息学287分,本科生物科学,求调剂 +3 碧水xyz 2026-03-29 4/200 2026-04-01 15:35 by plum
[考研] 311求调剂 +10 李芷新1 2026-03-31 10/500 2026-04-01 14:38 by chenqifeng666
[考研] 安徽大学专硕生物与医药专业(086000)324分,英语已过四六级,六级521,求调剂 +10 美味可乐鸡翅 2026-03-26 12/600 2026-04-01 11:17 by syh9288
[考研] 求0861交通运输专硕or材料专硕调剂 +4 勒布朗@ 2026-03-31 4/200 2026-04-01 09:54 by 一只好果子?
[考研] 材料科学与工程求调剂 +13 深V宿舍吧 2026-03-29 13/650 2026-03-31 19:50 by Dyhoer
[考研] 0856求调剂 +9 楒桉 2026-03-28 9/450 2026-03-31 19:06 by 暮泽12
[考研] 272求调剂,接受跨专业调剂! +3 闲鱼卢 2026-03-31 3/150 2026-03-31 13:00 by 替代品000
[考研] 274求调剂 +6 xiao爱同学 2026-03-30 6/300 2026-03-31 10:04 by cal0306
[考研] 抱歉 +3 田洪有 2026-03-30 3/150 2026-03-30 19:11 by 迷糊CCPs
[考研] 考研调剂 +5 Sanmu-124 2026-03-26 5/250 2026-03-30 13:36 by chemdavid
[考研] 调剂考研 +3 王杰一 2026-03-29 3/150 2026-03-29 08:09 by fmesaito
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
信息提示
请填处理意见