ex.dpr

来自「tongji acm-online judge solution」· DPR 代码 · 共 15 行

program Ural_1327(Input,Output);
type
	TIndex=Longint;
var
	A,B:TIndex;
procedure Main;
begin
	Readln(A,B);
	if not Odd(A) then Inc(A);
	if not Odd(B) then Dec(B);
	Writeln((B-A) div 2+1);
end;
begin
	Main;
end.