program rqnoj29;

var a:array[1..100]of string;

i,n:integer;

b:array[1..100]of 0..1;

procedure pp(s:string);

var i,j,x,y,k:integer;

begin

i:=pos(' ',s)-1;

j:=length(s);

x:=ord(s[i])-48;

y:=ord(s[j])-48;

if (x mod 2=1)and(y mod 2=1)then k:=1;

if (x mod 2=0)or(y mod 2=0)then k:=0;

writeln(k)

end;

begin

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do pp(a[i]);

readln;

end.

状态: Unaccepted

测评机： Xeost[5]

得分： 0分

提交日期： 2010-7-26 10:25:00

有效耗时： 该状态没有记录

测试结果1: 运行错误|普通保护错误

测试结果2: 运行错误|普通保护错误

测试结果3: 运行错误|普通保护错误

测试结果4: 运行错误|普通保护错误

测试结果5: 运行错误|普通保护错误

测试结果6: 运行错误|普通保护错误

测试结果7: 运行错误|普通保护错误

测试结果8: 运行错误|普通保护错误

测试结果9: 运行错误|普通保护错误

测试结果10: 运行错误|普通保护错误

为什么会这样？

题目:[stupid]愚蠢的组合数

问题编号:29

应该是数值太大了。算不重复组合数的公式是：组合数=总元素数！/（选取元素数！*（总元素数-选取元素数）！）。看了这个公式请考虑一下

我想了一下，根据公式，只要N>1，N!一定是偶数，M<=N，所以M!与N！同理，（N-M）！也一样，偶数乘偶数还是偶数，所以公式的分子分母绝大多数时候都是偶数。现在问题的关键是相除后是什么数。偶数除偶数既可以是奇数也可以是偶数。

原来我题目看错了