var m, k, res : integer;

begin
  write('Введите кол-во учеников: '); read(m);
  write('Введите кол-во карамелек: '); read(k);
  res := k mod m;
  write('Чтобы было поровно нужно убрать: ',res);
end.