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

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

Задать свой вопрос
1 ответ
Найдем первое число из данного спектра, кратное семи.
100 / 7 = 14 и остаток 2.
100 + (7-2) = 105. (можно отыскать это число и другими маршрутами).
И теперь задачка сводится к нахождению суммы чисел последовательности 105, 112, ... где заключительнее число не превосходит 200,

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  Writeln('S=',Range(105,200,7).Sum)
end.

Тестовое решение:
S=2107
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт