|  呃呃呃呃呃呃呃呃呃。。。。。。。。。。 | 
          
            | 随便 (  )
 | 
          
          
            |  我也不知道有虾米用处 | 
          
            | 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 © 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 © 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 © 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 © 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 © 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  ]——————__
 [      ]
 (      )
 -----_____
 |    |
 |    |
 (--)  (--)
 
 (  )
 |