1. Любознательный ученик Один любознательный мальчик очень любит наблюдать за кузнечиком. И вот что он заметил, если посадить кузнечика в исходную позицию он прыгает каждую секунду на 1 позицию вправо, пока не достигнет точки М. Затем он начинает прыгать каждую секунду на 1 позицию влево, пока не вернется в исходную позицию, примем ее за 0.

Требуется определить, в какой позиции окажется кузнечик через К секунд.

Входные данные содержат два числа: М и К. Выходные данные одно число – номер позиции кузнечика.

Пример входных данных: 5 8

Пример выходных данных: 2

var
  y: System.uint64; //Большая цЫфра же и положительная
  x, i: byte; //Нет смысла большие числа брать слишком, переполнение будет

begin
  readln(x); //Принимаем число...
  y := 1;
  i := 1;
  repeat
    y *= i; //...и умножаем такое-то количество раз
    i += 1;
  until (i > x);
  if (y = 0) then //Выводим, предусмотрев переполнение
    writeln('Слишком большая цЫферка')
  else
    writeln(y);
end.

Int64 - это то же самое, что LongInt, а Uint64 (unsign long int) - длинное число без знака, при правильном использовании позволяет записывать в переменную числа, в 2 раза превышающие максимум Int64

Чтобы число получилось максимальным, нужно поменять самое большое вычитаемое число и самое маленькое прибавляемое. То есть 2015 и 2.

Сначала легче посчитать исходное значение выражение.

Если разбить выражение на пары (2016-2015) + (2014-2013) ... То можно заметить, что значение каждой скобки равно 1.
Таких пар будет 2016 : 2 = 1008
1008*1 = 1008

В двух парах, а именно (2016-2015) и (2-1) произойдут изменения. Уберём их из общего выражения на время. Без этих 4-х чисел значение выражения равно 1006.

2016−2015+2014−2013+…+2−1 = 1006 + (2016 - 2015) + (2 - 1)
Теперь поменяем местами 2015 и 2, найдём значение выражения:

1006 + (2016 - 2) + (2015 - 1) = 1006 + 2014 + 2014 = 5034