Pagini recente » Cod sursa (job #1385114) | Cod sursa (job #1593520) | Cod sursa (job #2036818) | Cod sursa (job #2311238) | 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