Anayaron
6 год назад
N школьников делят k яблок поровну, неделящийся остаток остается в корзинке. Сколько яблок достанется каждому школьнику? Сколько яблок останется в корзинке? Программа получает на вход числа n и k и должна вывести искомое количество яблок (два числа).
ОТВЕТЫ
Jun 29, 2019
Program sh;
var n,k: integer;
begin
write(введите кол-во школьников: );
readln(n);
write(введите кол-во яблок: );
readln(k);
writeln(останется в корзинке: , k mod n);
writeln(достанется каждому по , k div n);
end.
var n,k: integer;
begin
write(введите кол-во школьников: );
readln(n);
write(введите кол-во яблок: );
readln(k);
writeln(останется в корзинке: , k mod n);
writeln(достанется каждому по , k div n);
end.
118
Смежные вопросы:
