| 查看: 1627 | 回复: 15 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
hjnwsuaf金虫 (著名写手)
|
[求助]
帮忙解释下这段fortran程序，谢谢 已有2人参与
|
||
|
DIMENSION M(6) READ (*,*) M DO 10 J=1，6 DO 10 K=J,6 IF(M(K) .LT. M(J)) THEN N=M(K) M(K)=M(J) M(J)=N END IF 10 CONTINUE WRITE(*,100)(M(I),I=1，6) 100 FORMAT(2X,614) END 帮忙介绍下每一句话什么意思。 |
回复此楼» 收录本帖的淘帖专辑推荐
 程序 |
» 猜你喜欢
广西大学-广州大学招聘博士后 欢迎广大优秀人才！！！
已经有11人回复
-
闲聊
已经有3人回复
-
江苏省自然基金 什么时候出结果
已经有4人回复
-
如何查询2026年获批项目名称？
已经有3人回复
-
两块石头
已经有10人回复
-
科研人应该花精力去思考如何解决问题，而不是去凝练问题
已经有19人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有15人回复
-
面上没中，邀请各位路过的虫友分析一下分数
已经有13人回复
-
初秋的晨风
已经有6人回复
-
Ei源刊怎么投
已经有4人回复
sk时空
新虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 2078.8
- 散金: 20
- 红花: 3
- 帖子: 140
- 在线: 40.3小时
- 虫号: 3273422
- 注册: 2014-06-14
- 专业: 原子和分子物理
9楼2016-08-16 13:42:37
hjnwsuaf2楼2016-08-16 10:45:07
hjnwsuaf
金虫 (著名写手)
- 应助: 10 (幼儿园)
- 金币: 1675.1
- 散金: 569
- 红花: 11
- 帖子: 1069
- 在线: 101.6小时
- 虫号: 3543986
- 注册: 2014-11-18
- 性别: GG
- 专业: 土壤学
3楼2016-08-16 10:57:31
4楼2016-08-16 11:06:28