Question

Дано все 3-х значные числа Найти сумму и  колличество чисел, кратных 9.

Answer 1

Минимальное трехзначное число равно 100, максимальное - 999. Первое число, кратное девяти, равно 108 (по признаку делимости сумма цифр числа должна делиться на 9). А затем нужно последовательно прибавлять по 9.

// PascalABC.NET 3.0, сборка 1128
begin
  var p:=Range(108,999,9);
  WriteFormat('Чисел на интервале {0}, их сумма {1}',
    p.Count,p.Sum)
end.

Тестовое решение:
Чисел на интервале 100, их сумма 55350