



时间:2015-12-17 关注公众号 来源:网络
【新建项目】
3、【编写代码】
program main
implicit none
integer::i
integer::su(30)
su(1)=1
su(2)=1
print *,su(1)
print *,su(2)
do i=3,99
su(i)=su(i-2)+su(i-1)
print *,su(i)
end do
end
4、【在codeblocks中编译、链接】
5、【测试、运行,结果如下】
文章内容来源于网络,不代表本站立场,若侵犯到您的权益,可联系我们删除。(本站为非盈利性质网站)
电话:13918309914
QQ:1967830372
邮箱:rjfawu@163.com