N школьников делят k яблок поровну, неделящийся остаток остается в корзинке. Сколько яблок достанется каждому школьнику? Сколько яблок останется в корзинке? Программа получает на вход числа n и k и должна вывести искомое количество яблок (два числа).
Var n, k: integer; begin readln(n); readln(k); writeln('В корзине останется ', k mod n,' яблок'); writeln('Каждый получит по ', k div n,' яблок'); end.