24小时热门版块排行榜    

CyRhmU.jpeg
查看: 664  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

cpz880822

银虫 (正式写手)

[求助] 费氏数列已有1人参与

program ex 0602
        implicit none
        integer n,f,m
        parameter (n=100)
        dimension f(n)
      read(*,*)m
        if(m.le.1)then
         f(m)=m
        else
        f(m)=f(m-1)+f(m-2)
      endif
        write(*,*)m,f(m)
               stop
        end
         
题目要求f(0)=0,f(1)=1,当n>1时,满足f(n)=f(n-1)+f(n-2).
我觉得是else那的问题,但是改不过来!初学者,谢谢大家帮忙!
回复此楼

» 猜你喜欢

感恩生活,用心做事
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

另外,你需要使用循环……
3楼2015-06-22 08:49:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
fortran 中默认下标是从 1 开始的,除非你声明下标是从零开始……
2楼2015-06-22 08:48:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见