Ответы на вопрос:
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.
Популярно: Другие предметы
-
Uncleuncle124.07.2021 07:07
-
tihon12312305.02.2021 07:00
-
Yulia54203.12.2022 13:06
-
Lesawolk1228.06.2020 07:39
-
Alexa64710.10.2022 07:45
-
tivaschhenko28.05.2023 18:26
-
stepanoganezov26.12.2021 17:31
-
Dashe444ki04.11.2022 03:34
-
Innochka09825.04.2021 05:29
-
Znv25060509.08.2020 01:52