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