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

讨论 Discussion
 
yyyy
编个抽奖程序判断1234是不是傻逼吧!
( 2017/1/12 11:11:12 )

呃呃呃呃呃呃呃呃呃。。。。。。。。。。
随便
( )
我也不知道有虾米用处
var a:array[0..100]of integer;
n,s:integer;
procedure print;
var i:integer;
begin
for i:=1 to 2*n do write(a[i]:2);
writeln;

end;
procedure f(k,x,y:integer);
var i:integer;
begin
if k>2*n then
begin
  s:=s+1;
  print;
  exit;
end
else
begin
  if x<n then
  begin
    a[k]:=1;
    x:=x+1;
    f(k+1,x,y);
    x:=x-1;
  end;
  if (y<x) an(y<n) then
  begin
    a[k]:=0;
    y:=y+1;
    f(k+1,x,y);
  end;

end;
end;
begin
read(n);
f(1,0,0);
write(s);
end.

( )
呵呵呵

( )
SB
Yyyy you laochan a!
( )
发表此讨论者头脑有问题!
发表此讨论者头脑有问题!真的!
( )
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
my very Agreed to

( )
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
my very Agreed to

( )
      ______________
     (   猪猪猪猪猪  )
    {  猪   猪  }     __________\   ???          
    |        |         /  猪猪猪        
     (   猪猪猪  )
      --------------
        [  ]
      ----------
-_________ [  L  L  ]——————__
       [      ]
       (      )
      -----_____
       |    |
       |    |
       (--)  (--)
( )
fgfskkl;df
页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
 P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
 T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  
T1087 little test [3] Done  

 
 
最新作业 New HomeWorks  
 H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
    k [110]
  yyyy [8]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 57次
通过 31题
通过率 54%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.1
2016/12/26 16:25:23

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users



 
 





( )
aaaaaaaaaa

提交 91 / 297 题 ( 31% )   首页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
 P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
 T1092 期末信息学测试模拟赛 [10] Live  
T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  

 
 
最新作业 New HomeWorks  
 H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
    yyyy [9]
  k [110]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 297次
通过 91题
通过率 31%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.8
2016/12/27 7:41:10

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users

籽岷  



我的世界  



我的世界,我做主!  



 
 




 Copyright wtboj &copy; 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 310 | Online Users / Processes : 0 / 18 | Processed Time : 31 ms | Server Time : 2016/12/27 7:52:13  


cvxbhcxb  




( )
xxxxxxxxxxxx

提交 91 / 297 题 ( 31% )   首页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
讨论 Discussion  
  yyyy  
张楚阳  


编个抽奖程序判断1234是不是傻逼吧!
( 2016/12/27 7:52:51 )  

--------------------------------------------------------------------------------
呃呃呃呃呃呃呃呃呃。。。。。。。。。。
代替fzh666  


随便
( )  
我也不知道有虾米用处
代替fzh666  


var a:array[0..100]of integer;
n,s:integer;
procedure print;
var i:integer;
begin
for i:=1 to 2*n do write(a[i]:2);
writeln;

end;
procedure f(k,x,y:integer);
var i:integer;
begin
if k>2*n then
begin
  s:=s+1;
  print;
  exit;
end
else
begin
  if x<n then
  begin
    a[k]:=1;
    x:=x+1;
    f(k+1,x,y);
    x:=x-1;
  end;
  if (y<x) an(y<n) then
  begin
    a[k]:=0;
    y:=y+1;
    f(k+1,x,y);
  end;

end;
end;
begin
read(n);
f(1,0,0);
write(s);
end.

( )  
 
Mr Huang  


呵呵呵

( )  
SB
我的世界,我做主!  


Yyyy you laochan a!
( )  
发表此讨论者头脑有问题!
1234  


发表此讨论者头脑有问题!真的!
( )  
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代替fzh666  


my very Agreed to

( )  
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代替fzh666  


my very Agreed to

( )  
 
我的世界,我做主!  


      ______________
     (   猪猪猪猪猪  )
    {  猪   猪  }     __________\   ???          
    |        |         /  猪猪猪        
     (   猪猪猪  )
      --------------
        [  ]
      ----------
-_________ [  L  L  ]——————__
       [      ]
       (      )
      -----_____
       |    |
       |    |
       (--)  (--)
( )  
fgfskkl;df
我的世界,我做主!  


页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  
T1087 little test [3] Done  

 
 
最新作业 New HomeWorks  
H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
   k [110]
  yyyy [8]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 57次
通过 31题
通过率 54%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.1
2016/12/26 16:25:23

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users




 





( )  
aaaaaaaaaa
cvxbhcxb  



提交 91 / 297 题 ( 31% )   首页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
T1092 期末信息学测试模拟赛 [10] Live  
T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  

 
 
最新作业 New HomeWorks  
H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
   yyyy [9]
  k [110]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 297次
通过 91题
通过率 31%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.8
2016/12/27 7:41:10

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users

籽岷  



我的世界  



我的世界,我做主!  




 




 Copyright wtboj &copy; 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 310 | Online Users / Processes : 0 / 18 | Processed Time : 31 ms | Server Time : 2016/12/27 7:52:13  


cvxbhcxb  




( )  

 
 
发布讨论主题 回复讨论主题
 
 



 Copyright wtboj &copy; 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 310 | Online Users / Processes : 0 / 19 | Processed Time : 47 ms | Server Time : 2016/12/27 7:53:47  


cvxbhcxb  




( )
dddddddddddddd

提交 91 / 297 题 ( 31% )   首页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
讨论 Discussion  
  yyyy  
张楚阳  


编个抽奖程序判断1234是不是傻逼吧!
( 2016/12/27 7:52:51 )  

--------------------------------------------------------------------------------
呃呃呃呃呃呃呃呃呃。。。。。。。。。。
代替fzh666  


随便
( )  
我也不知道有虾米用处
代替fzh666  


var a:array[0..100]of integer;
n,s:integer;
procedure print;
var i:integer;
begin
for i:=1 to 2*n do write(a[i]:2);
writeln;

end;
procedure f(k,x,y:integer);
var i:integer;
begin
if k>2*n then
begin
  s:=s+1;
  print;
  exit;
end
else
begin
  if x<n then
  begin
    a[k]:=1;
    x:=x+1;
    f(k+1,x,y);
    x:=x-1;
  end;
  if (y<x) an(y<n) then
  begin
    a[k]:=0;
    y:=y+1;
    f(k+1,x,y);
  end;

end;
end;
begin
read(n);
f(1,0,0);
write(s);
end.

( )  
 
Mr Huang  


呵呵呵

( )  
SB
我的世界,我做主!  


Yyyy you laochan a!
( )  
发表此讨论者头脑有问题!
1234  


发表此讨论者头脑有问题!真的!
( )  
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代替fzh666  


my very Agreed to

( )  
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代替fzh666  


my very Agreed to

( )  
 
我的世界,我做主!  


      ______________
     (   猪猪猪猪猪  )
    {  猪   猪  }     __________\   ???          
    |        |         /  猪猪猪        
     (   猪猪猪  )
      --------------
        [  ]
      ----------
-_________ [  L  L  ]——————__
       [      ]
       (      )
      -----_____
       |    |
       |    |
       (--)  (--)
( )  
fgfskkl;df
我的世界,我做主!  


页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  
T1087 little test [3] Done  

 
 
最新作业 New HomeWorks  
H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
   k [110]
  yyyy [8]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 57次
通过 31题
通过率 54%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.1
2016/12/26 16:25:23

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users




 





( )  
aaaaaaaaaa
cvxbhcxb  



提交 91 / 297 题 ( 31% )   首页 站务 公告 | 题库 记录 测试 作业 排名 团队 讨论 | User Space 换肤 | 登出  

 
公告 News >>   新增功能:各团队管理员可以发布本团队作业了 ()  
 

--------------------------------------------------------------------------------

 
最新题目 New Problems  
P1674 买铅笔  2人 6次 33% 1
P1673 地图  4人 36次 11% 3
P1672 马的遍历  1人 10次 10% 3
P1671 选裙子  24人 39次 62% 1
P1670 乘公交  22人 35次 63% 1

 
 
最新测试 New Tests  
T1092 期末信息学测试模拟赛 [10] Live  
T1091 小测试 [1] Done  
T1090 小测试 [1] Done  
T1089 提高组测试 [8] Done  
T1088 初学测试 [10] Done  

 
 
最新作业 New HomeWorks  
H1056 南城阳光一小  周末测试(有奖)  Checking  
H1055 南城阳光一小  初学作业  Checking  
H1054 南城阳光一小  搜索练习  Checking  
H1053 南城阳光一小  初中级选手本周作业  Checking  
H1052 南城阳光一小  提高组本周作业  Checking  

 
 
最新讨论 New Discussions  
   yyyy [9]
  k [110]
  年内能 [22]
  fzh666进来 [20]
  oooo [46]
  笑话群 [15]
  黑客技术 [1]
  测智商 [3]
  找I [4]
  wuheyesxfsyjm [6]

 

--------------------------------------------------------------------------------
 
 
 
  
用户信息 User Info


进入我的 User Space 特区
--------------------------------------------------------------------------------
Level Member
提交 297次
通过 91题
通过率 31%  

--------------------------------------------------------------------------------
团队 南城阳光一小
最近登入 113.108.127.8
2016/12/27 7:41:10

--------------------------------------------------------------------------------
修改我的用户资料  
 
 
最新用户 New Users

籽岷  



我的世界  



我的世界,我做主!  




 




 Copyright wtboj &copy; 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 310 | Online Users / Processes : 0 / 18 | Processed Time : 31 ms | Server Time : 2016/12/27 7:52:13  


cvxbhcxb  




( )  

 
 
发布讨论主题 回复讨论主题
 
 



 Copyright wtboj &copy; 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 310 | Online Users / Processes : 0 / 19 | Processed Time : 47 ms | Server Time : 2016/12/27 7:53:47  


cvxbhcxb  




( )
aaaaaaaaaa
aaaaaaaaaa抄什么抄这是四年级的讨论SB
( )
dsa
张力文滚
( )
asdf
      ______________
     (   猪猪猪猪猪  )
    {  猪   猪  }     __________\   张力文         
    |        |           /  猪猪猪        
     (   猪猪猪  )
      --------------
        [  ]
      ----------
-_________ [  L  L  ]——————__
       [      ]
       (      )
      -----_____
       |    |
       |    |
       (--)  (--)

( )
发布讨论主题 回复讨论主题
 Copyright wtboj © 2005-2006. www.wutuobang.date Powered by wtboj 关于 联系 帮助
 wtboj Information ---- Total Users : 1242 | Online Users / Processes : 0 / 74 | Processed Time : 95 ms | Server Time : 2025/4/27 2:17:01