| 查看: 1793 | 回复: 28 | |||
| 当前主题已经存档。 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
freqent银虫 (小有名气)
|
[交流]
【求助】Fortran 该怎么学?【已完结】
|
||
|
最近想学Fortran,搜索了一下,版本挺多的,最新的好像是Fortran2003,不知道对于我这种新手来说,如何入门更好一些,请指点? [ Last edited by 余泽成 on 2010-1-18 at 22:01 ] |
» 猜你喜欢
求助:我三月中下旬出站,青基依托单位怎么办?
已经有9人回复
Cas 72-43-5需要30g,定制合成,能接单的留言
已经有8人回复
北京211副教授,35岁,想重新出发,去国外做博后,怎么样?
已经有8人回复
磺酰氟产物,毕不了业了!
已经有5人回复
论文终于录用啦!满足毕业条件了
已经有25人回复
2026年机械制造与材料应用国际会议 (ICMMMA 2026)
已经有3人回复
自荐读博
已经有3人回复
不自信的我
已经有5人回复
投稿Elsevier的杂志(返修),总是在选择OA和subscription界面被踢皮球
已经有8人回复

tomato12345`
金虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 823.6
- 帖子: 75
- 在线: 20.2小时
- 虫号: 396267
- 注册: 2007-06-08
- 性别: GG
- 专业: 自然资源管理
★
小木虫(金币+0.5):给个红包,谢谢回帖交流
小木虫(金币+0.5):给个红包,谢谢回帖交流
|
个人觉得一定要用中学,即要针对自己要解决的问题来学习fortran,否则难以真正掌握,此外,能够满足自己的研究需要即可,也不必面面俱到。有些时候f77的命令也是需要的,例如: 100 do i=1, Numofsamples sig=0 call random_number(harvest=t) randnum(i)=lbound+int(real(len)*t) LOOP1: do j=1, i if (i/=j) then if (randnum(i)==randnum(j)) then sig=1 exit LOOP1 else sig=0 End if end if end do LOOP1 if (sig==1) goto 100 end do ! sig==1时,说明随机整数有重复,跳转到100行、从i=1开始重新抽样, 此处用F90的cycle就不行! |
25楼2010-01-12 09:59:04
tomato12345`
金虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 823.6
- 帖子: 75
- 在线: 20.2小时
- 虫号: 396267
- 注册: 2007-06-08
- 性别: GG
- 专业: 自然资源管理
28楼2010-01-13 11:51:25









回复此楼