for i:=1 to n do begin

read(x);

ans:=ans xor x;

end;

注意ans,x不能是longint

果断要int64

XOR满足交换率，于是…………两星纪念。

归并排序，过了，最后一个点462ms,测评机Vijos Easy,编译器GCC,记录号1727174

再次提醒大家，学C的和学C++的要用long long,学pascal的要用INT64

奇水无比

^^

奇水无比

program water;

var

n,i:longint;

t,b:int64;

begin

readln(n);

t:=0;

for i:=1 to n do

begin

read(b);

t:=t xor b;

end;

write(t);

end.

为什么难度是3.。。。。

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：运行时错误...|错误号: -1073741571

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：60 有效耗时：0ms

框编了……

神奇的xor……

此题深有意味，鼓励我们要好好学习位运算

BS没说范围!!

注意要int64

var

n,i:longint;

xorr,b:int64;

begin

readln(n);

xorr:=0;

for i:=1 to n do

begin

read(b);

xorr:=xorr xor b;

end;

write(xorr);

end.

直接在手机上提交……

异或有一个重要的性质:(a xor b) xor b = a 也就是说异或是自身的逆运算。 所以把所有读入的数都异或一遍就能得到唯一没被异或两次(抵消)的数。

即:x

直接在代码框敲，0ms秒杀。

没别的，注意用int64就行了

看了题解以后，在网页代码框里敲，过了。

306ms.

似乎听过这个题吖

不过忘了是用异或了

挺神奇的

不过用排序也可以0ms嘛

曾经碰到过这种题

比这稍微复杂点

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

program p1684;

var

n,ans,x:int64;

i:longint;

begin

readln(n);

read(x);

ans:=x;

for i:=2 to n do

begin

read(x);

ans:=ans xor x;

end;

writeln(ans);

end.

xor

啊~~一定要int64~~被害惨了~~WA了一次……