составить программу нахождения суммы чисел от 100 до 200 кратных 7

Найдем первое число из данного диапазона, кратное семи.100 / 7 = 14 и остаток 2.100 + (7-2) = 105. (можно найти это число и другими путями).И теперь задача сводится к нахождению суммы чисел последовательности 105, 112, ... где последнее число не превышает 200,// PascalABC.NET 3.1, сборка 1192 от 07.03.2016begin  Writeln('S=',Range(105,200,7).Sum)end.Тестовое решение:S=2107