| 查看: 833 | 回复: 5 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
宝莲灯木虫 (小有名气)
虫虫
|
[交流]
【讨论】编程求助
|
||
|
在Linux系统下编译fortran。想取sufer中geo2km-gzdw中的部分数据，把它加高20米，然后再放回到geo2km-gzdw文件中原来的位置。该怎么做？ 我编的程序如下： dimension a(100,100) sed -n '547,623p' geo2km-gzdw.dat > ab.dat *这句话有问题，下面的都运行过，没有问题* open (10,file='ab.adt') do j=1,76 read (10,*) (a(i,j),i=1,66) do i=1,66 if (i.ge.23.and.i.le.32.and.j.gz.32.and.j.le.42) then 20 format(10f20.9) a(i,j)=a(i,j)+20 endif end do end do do j=1,76 write(*,30) a(i,j),i=1,66) 30 format(66F20.9) end do close(10) stop end |
回复此楼» 猜你喜欢
一志愿郑大材料工程290求调剂
已经有6人回复
-
292求调剂
已经有11人回复
-
309求调剂
已经有11人回复
-
262求调剂
已经有3人回复
-
303求调剂
已经有5人回复
-
300求调剂，材料科学英一数二
已经有17人回复
-
一志愿北京化工大学材料与化工（085600）296求调剂
已经有21人回复
-
307求调剂
已经有15人回复
-
286分调剂
已经有9人回复
-
求调剂323材料与化工
已经有8人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求助Fortran编程
已经有8人回复
- 求助matlab编程
已经有13人回复
- 【求助】有关“SW0PC_FXGP编程软件”的介绍
已经有1人回复
- 【求助】有没有会编程的兄弟给帮下忙
已经有4人回复
- 【求助】关于编程的一个问题
已经有4人回复
- 【求助】蒙卡编程问题
已经有15人回复
- 【求助】小町算编程【已完成】
已经有15人回复
5楼2017-06-20 18:14:38
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
2楼2010-08-26 20:28:37
yscot
木虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 1803.2
- 红花: 1
- 帖子: 521
- 在线: 68.6小时
- 虫号: 968898
- 注册: 2010-03-12
- 专业: 生物大分子结构与功能
3楼2010-09-04 22:09:48
coolrainbow
木虫 (著名写手)
未来国家冻凉
- 程序强帖: 2
- 应助: 1 (幼儿园)
- 贵宾: 0.1
- 金币: 3979.5
- 散金: 10
- 红花: 50
- 帖子: 1137
- 在线: 272.3小时
- 虫号: 239560
- 注册: 2006-04-07
- 性别: GG
- 专业: 理论和计算化学
4楼2010-09-05 07:55:42
