Pagini recente » Cod sursa (job #2962744) | Cod sursa (job #1911064) | Cod sursa (job #2796541) | Cod sursa (job #2125239) | Cod sursa (job #126437)
Cod sursa(job #126437)
var
fi, fo : text;
n, m, k, i, s, d, suma : longint;
mica : boolean;
begin
assign(fi,'stergeri.in'); reset(fi);
assign(fo,'stergeri.out'); rewrite(fo);
readln(fi, n, m, k);
mica := true;
for i := 1 to m do
begin
readln(fi, s, d);
if s <= k then
mica := false;
inc(suma,d-s+1);
end;
if mica then
writeln(fo, k)
else
writeln(fo, suma+k);
close(fi); close(fo);
end.
123456789012345678901234567890
1567890
3+20+3=26