说实话,Fortran不是什么我喜欢的语言,不过这是今年的课所以我也不得不做.这里提供的部分习题答案仅供我的同学复习参考之用.

本人水平有限,难免会有错误,如果发现请及时联系我,谢谢!(联系方式见AboutMe页面)

第65页第3题求余弦函数，原来的答案有错误，现在已经修改。
特别提示：希望大家不要打印出来看，编程最好的方式是通过上机练习，并且本页面的参考答案随时都会更新。

!第29页第7题
program main
    real c,f
    read(*,*),c
    f=9*c/5+32
    write(*,100) f
100 format(1x,f7.3)
end

!第29页第8题第1小题
program main
    integer a,b,c
    real average
    read(*,*)a,b,c
    average=(a+b+c)*1.0/3
    write(*,100) average
100 format(1x,f7.3)
end

!第29页第8题第2小题
program main
    real x,y,ans
    read(*,*) x,y
    ans=log(x*x+y)/(sin(x*y)**2+1)+32
    write(*,100) ans
100 format(1x,f7.3)
end

[……]

Continue