МНОГО БАЛЛОВ
Два целых числа одной чётности, вмещающихся в 32-битный тип данных со знаком. Первое из чисел не больше второго. Найти середину отрезка между этими числами. Разрешается пользоваться только 32-битными целочисленными типами данных.
Нужно на си, но можно на паскале или алгоритм.
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
begin
var a,b:integer;
Read(a,b);
if abs(a)> abs(b) then Swap(a,b);
var d:=(b-a) shr 1;
Writeln(a+d)
end.