Cod sursa(job #1022983)
Utilizator | Data | 6 noiembrie 2013 11:44:00 | |
---|---|---|---|
Problema | Stergeri | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.41 kb |
var
fi, fo : text;
n, m, k, i, r : longint;
s, d : array[1..100000] of longint;
begin
assign(fi,'stergeri.in'); reset(fi);
assign(fo,'stergeri.out'); rewrite(fo);
readln(fi, n, m, k);
for i := 1 to m do
readln(fi, s[i], d[i]);
r := k; { raspunsul }
for i := m downto 1 do
if s[i] <= r then
inc(r,d[i]-s[i]+1);
writeln(fo, r);
close(fi); close(fo);
end.