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

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

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

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

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

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

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.