n школьников делят k яблок “поровну”, то есть так, чтобы количество яблок, доставшихся любым двум школьникам, отличалось бы не более, чем на 1.

Входные данные
Программа получает на вход числа n и k.

Выходные данные
Программа должна вывести количество школьников, которым достанется яблок меньше, чем некоторым из их товарищей.

Примечание
При решении этой задачи нельзя пользоваться условной инструкцией if и циклами.

Примеры
входные данные
7
30
выходные данные
5
входные данные
7
28
выходные данные
0

ПримечаниеПри решении этой задачи нельзя пользоваться условной инструкцией if и циклами.

увы, но это условие)

прошу прощения, не увидел, что это проверка)

var    n, k: integer;begin    readln(n, k);    {решение без циклов и условных операторов}    writeln('Решение Учеников = ', (n - k mod n) mod n);         {проверка}            while k > n do        k := k - n;            if k > 0 then         n := n - k     else         n := 0;    writeln('Проверка Учеников = ', n);end.

var a, b: integer;beginread(b, a);write((b - a mod b) mod b);end.