FORTRAN 95编程题

FORTRAN 95编程题如图所示。

2025-05-21 10:29:32

推荐回答（1个）

回答（1）：

! 实验内容 1
write(*,*) ' 请输入一个角度值（以°为单位） x = ? '
Read(*,*) x ; x = x*3.1415926/180

n=0; s=1; co=1.0
do
n = n+2
s =-s*x*x/n/(n-1)
co = co+S
if (abs(s)<1e-7) exit
enddo
write(*,*) ' cos',x,' =',co
end

! 附注：我的回答常常被“百度知道”判定为违反“回答规范”，但是我一直不知道哪里违规，也不知道对此问题的回答是否违规。