Задачка по языку программирования Pascaln школьников делят k яблок поровну, то

Задачка по языку программирования Pascal
n школьников делят k яблок поровну, то есть так, чтобы количество яблок, доставшихся хоть каким двум школьникам, отличалось бы не более, чем на 1.

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

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

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программка не работает, обновите версию!

Begin
var (n, k) := ReadInteger2('Введите n и k');
Writeln(k - (k div n) * n);
end.

Municyn Oleg
если будет угодно, перепишите под собственный, идею я подал и воплотил на PascalABC.NET
Таисия Старостюкова
По которому не программируют теснее +20 лет. Это задачка из http://informatics.mccme.ru
Надежда Ганчина
Всё одинаково спасибо.
Kamilla Manochkina
Кошмар...ну формула подойдет под хоть какой паскаль, которая k - (k div n) * n
Шуберт Регина
да, я на данный момент пробую преобразовать скинутую мной формулу под то что вы мне дали)
Ева
Можно ли ещё вопрос?
Света Болескина
var n,k,x:integer;beginreadln(n,k);x:=k-n mod k;writeln('x=',x);end.
Вадик
Совсем ошибочно
Вадим Валерко
Ни один тест не прошло...
Данька Дымников
хмм,..может поэтому, что там фаловый ввод вывод?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт