N студентов делят K яблок. Они делят яблоки поровну, а неделимый остаток кладут обратно в...

Question

N студентов делят K яблок. Они делят яблоки поровну, а неделимый остаток кладут обратно в корзину. Напишите программу, которая будет принимать на вход количество студентов и яблок. На выходе мы должны получать число яблок, которое получит каждый студент и количество яблок, оставшихся в корзине. Пример входа: 6 50 Пример результата: 8 2 В ответе напишите результат для 8 студентов и 100 яблок.

Answer 1

Ответ:

12    4

Объяснение:

PascalABC

var

 n,k,apl,rest:integer;

 p:real;

 

 begin

   writeln('Введите количество студентов');

   readln(n);

   writeln('Введите количество яблок');

   readln(k);

   p := k/n;

   apl:=trunc(p);

   rest:= k-apl*n;

   

   writeln('Яблок на студента = '+apl+'шт. ,а в корзине осталось '+rest+'шт.');

 end.