Информатика, опубликовано 2018-08-22 23:56:58 by Гость

"n" школьников делят "к" яблок поровну,неделящийся остаток остается в корзине.Сколько яблок достанется каждому и сколько останется в корзине? Использовать язык Паскаль

Ответ оставил Гость

Если не ошибаюсь, это она. либо там выведется кол.во яблок каждому ученику.

program ...;
var
n, a, k, y : integer;
begin
readln (y, k);
a:= y mod k
y:= y div k
writeln (a, y);
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.