Pagini recente » Cod sursa (job #502755) | Cod sursa (job #2751375) | Cod sursa (job #2747370) | Cod sursa (job #711932) | Cod sursa (job #583303)
Cod sursa(job #583303)
var a : array[1..100000] of longint;
n, i, i2, j, n1, n2, smem, p1mem,p2mem : longint;
t : text;
begin
p2mem:=100;
assign(t,'xormax.in');
reset(t);
Readln(t,n);
for i:=1 to n do
begin
read(t,a[i]);
end;
for i:=1 to n do
for j:=i+1 to n do
begin
n1:=a[i];
for i2:=i+1 to j do
begin
n1:=a[i2] xor n1;
end;
if n1>smem then
begin
smem:=n1;
p2mem:=j;
p1mem:=i;
end;
end;
close(t);
assign(t,'xormax.out');
rewrite(t);
write(t,smem,' ');
write(t,p1mem,' ');
write(t,p2mem);
close(t);
end.