
Эрнест
4 год назад
Написать программу, которая для чисел в диапазоне от A до B определяла количество их делителей. К при- меру, A= 10, B = 15. Делители для числа 10 — 1 2 5 10; Делители для числа 11 — 1 11; Делители для числа 12 — 1 2 3 4 6 12; Делители для числа 13 — 1 13; Делители для числа 14 — 1 2 7 14; Делители для числа 15 — 1 3 5 15.

ОТВЕТЫ

Lindsey Matthew
Oct 24, 2020
- uses School;
- begin
- var (a, b) := ReadInteger2;
- (a..b).Sum(x -> x.Divizors.Count).Print
- end.
- Из скриншотов можно увидеть правильность выполнения поставленной задачи.
610
Смежные вопросы: