记录编号 1584 评测结果 WWTTTTTTTA
题目名称 圆弦 最终得分 10
用户昵称 GravatarNickName 是否通过 未通过
代码语言 Pascal 运行时间 7.002 s
提交时间 2008-09-05 14:31:57 内存使用 0.00 MiB
显示代码纯文本
program circlex;
var x1,x2:longint;
xiaoyi,shizhu:text;
n:longint;
ls,jg:longint;
function go(a:longint):longint;
var x:longint;
begin
if (a=1) or (a=0) then
go:=1 else
begin
ls:=0;
for x:=1 to a do
ls:=ls+go(x-2)*go(a-x);
go:=ls;
end;
end;
begin
assign(xiaoyi,'circlex.in');
assign(shizhu,'circlex.out');
reset(xiaoyi);
rewrite(shizhu);
readln(xiaoyi,n);
close(xiaoyi);
jg:=go(n);
writeln(shizhu,jg);
close(shizhu);
end.