Cod sursa(job #1202336)

Utilizator ctlin04UAIC.VlasCatalin ctlin04 Data 27 iunie 2014 18:11:46
Problema Stergeri Scor 100
Compilator fpc Status done
Runda Teme Pregatire ACM Unibuc 2013 Semestrul 2 Marime 0.34 kb
Program stergeri;
 var a,b:array [1..100005] of longint;
     i,n,m,k:longint;
     fi,fo:text;
begin
 assign(fi,'stergeri.in');
  assign(fo,'stergeri.out');
 reset(fi); rewrite(fo);
 readln(fi,n,m,k);
  for i:=1 to m do readln(fi,a[i],b[i]);
   for i:=m downto 1 do
    if k>=a[i] then k:=k+b[i]-a[i]+1;
  write(fo,k); close(fo);
end.