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

讨论 Discussion
 
数字金字塔答案
var i,n,k,j:integer;
begin
 read(n);
 for i:=1 to n do
 begin
  write('':n+0-i);k:=0;
  for j:=1 to 2*i-1 do
  begin
    if j>=i then
    k:=k-1
    else
    k:=k-1;
    write(k);
  end;
  writeln;
 end;
end.
( 2014/9/22 16:45:23 )

是打印金字塔
( 2014/9/22 16:45:24 )
发布讨论主题 回复讨论主题
 Copyright wtboj © 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 1242 | Online Users / Processes : 0 / 72 | Processed Time : 71 ms | Server Time : 2025/4/27 2:14:17