#1 thl@2012-01-30 23:40:00
24709
回复
删除
给分吧!
程序:var
i,n:longint;
a:Array[1..40] of longint;
begin
readln(n);
a[1]:=1; a[2]:=1;
for i:=3 to 40 do
a[i]:=a[i-1]+a[i-2];
for i:=40 downto 1 do
if a[i]<=n then begin
writeln(a[i-1],' ',a[i]);
break;
end;
end.
这个其实就是Fabonacci数列,推出来的,拜托给点分吧!
#4 thl@2012-01-31 06:27:00
24716
回复
删除
给你数据吧!这样能分了吧?
测试结果1:k=9574 m=4181 n=6765
测试结果2: k=8573 m=4181 n=6765
测试结果3: k=24485746 m=14930352 n=24157817
测试结果4: k=10475937 m=5702887 n=9227465
测试结果5: k=100000 m=46368 n=75025
#7 desprado2@2012-01-31 19:34:00
24721
回复
删除
回复 地下室灰天飞雁 的帖子
还有个问题。各种被封号的原因(如抄袭、使用不文明语言等)中,其原则是什么?(就是怎样会被封号,封几次号就无法解封?)
#10 desprado2@2012-01-31 23:52:00
24734
回复
删除
回复 地核thl 的帖子
做人要厚道,如果是斐波那契数列的话,我早过了!
别以为我什么都不会!
状态: Unaccepted
测评机: Xeost[5]
得分: 0分
提交日期: 2012-2-1 15:48:00
有效耗时: 该状态没有记录