"n" школьников делят "к" яблок поровну,неделящийся остаток остается в корзине.Сколько яблок достанется каждому и сколько останется в корзине? Использовать язык Паскаль
Если не ошибаюсь, это она. либо там выведется кол.во яблок каждому ученику. program ...; var n, a, k, y : integer; begin readln (y, k); a:= y mod k y:= y div k writeln (a, y); end.
спасибо