点击这里更换您喜欢的皮肤wtboj 首页
请点击这里登入noios   首页 入门 c++讲义 入门教程视频 金牌教程 入门视频 站务 公告 | 题库 记录 竞测 测试 闯关 作业 排名 团队 讨论 | 换肤 | 登入 注册  
News >>   新增功能:各团队管理员可以发布本团队作业了 ()

讨论 Discussion
 
HAHAHA
var a,b,c,i,n:integer;     {输入:5}
begin              {输出: }
 read(n);           {请在自己发布的信息里输入:输出:
 a:=1;             或output: 谢谢}
 b:=1;
 c:=a+b;
 i:=3;
 while i<n do
 begin
  i:=i+1;
  a:=b;
  b:=c;
  c:=a+b;
 end;
 if n<=2 then
 write(1)
 else
 write(a,' ',b,' ',c);
end.

( )

此主题无回复显示
发布讨论主题 回复讨论主题
 Copyright wtboj © 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 1242 | Online Users / Processes : 0 / 66 | Processed Time : 79 ms | Server Time : 2025/4/27 2:39:31