N школьников делят K яблок поровну, неделящийся остаток остается в корзинке. Сколько яблок достанется каждому школьнику? НАПИСАТЬ ПРОГРАМУ ДЛЯ ПАСКАЛЯ
Нет комментариев
Ответы
Гость Ну вот
var n,k: integer; begin write('Введите количество школьников: '); readln(n); write('Введите количество яблок: '); readln(k); writeln('Каждому школьнику достанеться ', trunc (k/n)); writeln('В корзине останеться ', k mod n);end.
(Программу писал сам)
1 комментария:
var n,k: integer;begin write('Введите количество школьников: '); readln(n); write('Введите количество яблок: '); readln(k); writeln('Каждому школьнику достанеться ', trunc (k/n)); writeln('В корзине останеться ', k mod n);end.
var n,k: integer;begin write('Введите количество школьников: '); readln(n); write('Введите количество яблок: '); readln(k); writeln('Каждому школьнику достанеться ', trunc (k/n)); writeln('В корзине останеться ', k mod n);end. Список предметов
