fortran编程题，分数数列求和，急求！！！ 20
有一分数序列：2/1，3/2，5/3，8/5，13/8，21/13...求出这个数列的前20项之和。跪求~~~~...
有一分数序列：2/1，3/2，5/3，8/5，13/8，21/13...求出这个数列的前20项之和。跪求~~~~
展开
2个回答
展开全部
a=2.;b=1.;s=0
do i=1,20
s=s+a/b
c=a+b
b=a
a=c
enddo
write(*,*) 'sum=',s
end
do i=1,20
s=s+a/b
c=a+b
b=a
a=c
enddo
write(*,*) 'sum=',s
end
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
写一个循环，通相是b/(a+b)
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
