Шаг
шаг
прыжок
поворот
поворот
поворот
шаг
шаг
прыжок
поворот
поворот
поворот
шаг
шаг
прыжок
поворот
поворот
поворот
шаг
шаг
прыжок
Var s:int64;
a,b,i:longint;
beginassign(input,'d.in');
reset(input);
assign(output,'d.out');
rewrite(output);
s:=0;
read(a,b);
if odd(a) then i:=a else i:=a+1;
while i<=b dobegins:=s+i;
inc(i,2);
end;
writeln(s);
<span>end.</span>
Var a,b:integer;
begin;
readln(a);
readln(b);
if a>b then write('Первое');
if a<b then write('Второе');
if a=b then write('=');
<span>end.</span>