program aaa; var d, n : integer; begin write ('введите число n-'); readln (n); writeln('делители числа: '); for d : =1 to n do if n mod d = 0 then writeln (d)end.
Ответ дал: Гость
125чел. это 5частей из 7
? чел. это 2 части из 7
125 чел. : 5 частей = (100+25): 5=100: 5+25: 5=20+5=25чел. это 1 часть из 7
25чел. х 2части=50 чел. , которые пришли на финиш после 1 часа
Популярные вопросы