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