记录编号 49398 评测结果 AWWWW
题目名称 三只小猪 最终得分 20
用户昵称 Gravataro_o 是否通过 未通过
代码语言 Pascal 运行时间 0.001 s
提交时间 2012-11-07 20:01:29 内存使用 0.24 MiB
显示代码纯文本
var
a,b,c,d,e,f,i,j,n:longint;
x,y:array[0..100]of longint;
k:array[0..100,0..100]of qword;
begin
assign(input,'piggy.in');
assign(output,'piggy.out');
reset(input);
rewrite(output);
readln(n);
for a:=1 to n do
readln(x[a],y[a]);
for a:=1 to 100 do
begin
k[a,a]:=1;
k[a,1]:=1;
end;
for j:=2 to 25 do
for i:=j+1 to 25 do

k[i,j]:=k[i-1,j]*j+k[i-1,j-1];


for a:=1 to  n do
writeln(k[x[a],y[a]]);
close(input);
close(output);
end.