首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > perl python >

简单的累加题目 求解答,该怎么处理

2012-03-04 
简单的累加题目 求解答第三个数字为第一个数字与第二个数字相加之和 以此类推请输入第一个数字 : 0请输入

简单的累加题目 求解答
第三个数字为第一个数字与第二个数字相加之和 以此类推


请输入第一个数字 : 0
请输入第二个数字 : 1
需要输出多少个数字 : 7



输出结果:0,1,1,2,3,5,8

powershell

[解决办法]
无聊瞎写的

Perl code
my @list;$a1=0;$a2=1;push(@list,$a1,$a2);print "number:\n";$num=<STDIN>;$list=@list;while($list<=$num-1){$list[$list]=$list[$list-2]+$list[$list-1];push(@list,$list[$list]);$list+=1;pop @list;}for(@list){print "$_ ";}
[解决办法]
Perl code
#! /usr/bin/perluse strict;use warnings;my $sum;my $i;chomp($i = <STDIN>);$sum = fun($i);sub fun{        if($i == 0)        {                return 0;        }        elsif($i == 1)        {                return 1;        }        else        {                return fun($i -1) + fun($i - 2);        }} 

热点排行