Написать программу, которая для чисел в диапазоне от 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.
PascalABC.NET:
uses School; begin var (a, b) := ReadInteger2; (a..b).Sum(x -> x.Divizors.Count).Printend.