Pagini recente » Cod sursa (job #3256914) | Cod sursa (job #2152146) | Cod sursa (job #407951) | Cod sursa (job #2495298) | Cod sursa (job #126499)
Cod sursa(job #126499)
const max=2000000;
var f,g:text;
a:array[1..max] of boolean;
i,j,k,sters,x,x1,y,n,t,nr:longint;
begin
assign(f,'stergeri.in');reset(f);
assign(g,'stergeri.out'); rewrite(g);
readln(f,n,t,nr);
fillchar(a,sizeof(a),true);
for i := 1 to t do begin
readln(f,x,y);
x1:=1;
sters:=y-x+1;
for j := 1 to n do begin
if a[j] then inc(x1);
if x1=x then break;
end;
for k := j+1 to n do begin
if a[k] then begin
sters:=sters-1;
a[k]:=false;
end;
if sters=0 then break;
end;
end;
i:=1;
for i := 1 to n do begin
if a[i] then nr :=nr-1;
if nr=0 then break ;
end;
writeln(g,i);
close(f);
close(g);
end.