Ну вот var n,k: integer; begin write('Введите количество школьников: '); readln(n); write('Введите количество яблок: '); readln(k); writeln('Каждому школьнику достанеться ', trunc (k/n)); writeln('В корзине останеться ', k mod n);end.
(Программу писал сам)
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.