N школьников делят k яблок поровну, неделящийся остаток остается в корзинке. Сколько яблок достанется каждому школьнику? Сколько яблок останется в корзинке? Программа получает на вход числа n и k и должна вывести искомое количество яблок (два числа).

Question

Информатика

Епифан

29 января, 17:37

N школьников делят k яблок поровну, неделящийся остаток остается в корзинке. Сколько яблок достанется каждому школьнику? Сколько яблок останется в корзинке? Программа получает на вход числа n и k и должна вывести искомое количество яблок (два числа).

+3

Ответы (1)

Знаете ответ?

Препедигна · Answer 1

Program sh;

var n, k: integer;

begin

write ('введите кол-во школьников: ') ;

readln (n) ;

write ('введите кол-во яблок: ') ;

readln (k) ;

writeln ('останется в корзинке: ', k mod n) ;

writeln ('достанется каждому по ', k div n) ;

end.