作者jubilee2 (3321)
看板Fortran
标题Re: [问题] 阶乘相加程式?
时间Thu Mar 31 22:52:42 2011
※ 引述《asmalljulie (chu)》之铭言：
: 我是新手~~~
: 在想阶乘怎相加呢?
: 像是1/1!+1/2!+1/3!+1/4!+1/5!=
: 这样要如何写程式呢?
好久没发文了手养写一下感谢我吧!
program a01
real*8 ans,temp
integer i
ans=0.0
temp=1.0
do i=1,5
temp=temp*i
ans=ans+1/temp
end do
print *, ans
end program
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.116.77.208
※ 编辑: jubilee2 来自: 111.81.176.95 (03/31 22:58)
1F：→ latinboy: temp=temp/i; ans=ans+temp 03/31 23:55
2F：→ tonyruler:上面跟原文都可以，原文把1改成1.0咖好 04/05 01:11
3F：推 asmalljulie:现在才发现 真是太感谢大大了~~ 还是不太懂数值这东 05/17 23:44