『彭国伦』版Fortran 95程序设计

比特仑苏还纯 · 发表于 2012-10-13 17:32:24

好东西，需要分享，谢谢楼主

suwenhui1210 · 发表于 2012-10-13 21:28:50

不错，谢谢分享

风荷 · 发表于 2012-10-14 10:01:23

正在找这本书，谢谢分享。

jvc1992 · 发表于 2012-10-14 14:19:20

哇~找了很久~

hyingniu · 发表于 2012-10-15 14:16:25

谢谢分享！

蓝天照长星 · 发表于 2012-10-18 08:31:03

好，正需要，不过版主能不能帮我看看我的程序错哪里，为什么从文件的输出总出错？
program homework1
implicit none
integer i
real x,sum,ave

open(unit=10,file='e:\homework\temp2.txt',access='direct',form='formatted',recl=6,status='old')
!open(unit=20,file='e:\homework\relate.txt',access='direct',form='formatted',recl=6,status='new')

!计算1月气温平均值
do i=1,30
read(10,rec=i)x
!sum=sum+x
write(*,*)x
end do
!ave=sum/30.0
!write(*,"('一月气温平均值:'f10.3)")ave
end

-2.7
-5.9
-3.4
-4.7
-3.8
-5.3
-5.0
-4.3
-5.7
-3.6
-3.1
-3.9
-3.0
-4.9
-5.7
-4.8
-5.6
-6.4
-5.6
-4.2
-4.9
-4.1
-4.2
-3.3
-3.7
-7.6
-3.5
-4.2
-4.5
-4.8

xiaolugui · 发表于 2012-10-18 16:36:44

好东西，下载下来学习学习

右手边的小星星 · 发表于 2012-10-18 21:20:55

谢谢分享啦，顶一个啦啦啦啦啦！

Royone · 发表于 2012-10-21 20:54:41

{:e313_b:}

tthy · 发表于 2012-10-21 22:01:21

先看下程序下载学学

		自动登录	找回密码
密码			立即注册

[参考资料] 『彭国伦』版Fortran 95程序设计