| 查看: 1402 | 回复: 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 帮忙介绍下每一句话什么意思。 |
» 收录本帖的淘帖专辑推荐
程序 |
» 猜你喜欢
0703化学321分求调剂
已经有10人回复
0703化学求调剂
已经有7人回复
一志愿厦门大学材料工程专硕354找调剂!!!
已经有5人回复
266分,求材料相关专业调剂
已经有5人回复
292求调剂
已经有13人回复
材料化工340求调剂
已经有3人回复
295材料工程专硕求调剂
已经有9人回复
085600 材料与化工 329分求调剂
已经有18人回复
一志愿北京化工大学材料与化工(085600)296求调剂
已经有23人回复
08工科,295,接受跨专业调剂
已经有3人回复
hjnwsuaf
金虫 (著名写手)
- 应助: 10 (幼儿园)
- 金币: 1675.1
- 散金: 569
- 红花: 11
- 帖子: 1069
- 在线: 101.6小时
- 虫号: 3543986
- 注册: 2014-11-18
- 性别: GG
- 专业: 土壤学
6楼2016-08-16 11:26:49
2楼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














回复此楼
hjnwsuaf