Найти сумму натуральных трехзначных чисел, каждое из которых при делении на 7 дает в остатке 3. (С использованием цикла, на языке Pascal)

Предыдущий
вопрос Следующий
вопрос

program SumOfNumbers;

va
i, sum: integer;

begi
sum := 0;

for i := 103 to 999 step 7 d
begi
sum := sum + i
end;

writeln('Сумма натуральных трехзначных чисел, которые при делении на 7 дают в остатке 3: ', sum)
end.