Задать вопрос Регистрация
Помочь другим

  • Найти сумму всех трёхзначных четных чисел. Программа Паскаль

Ответы 3

  • Да, но это вовсе не "программа Паскаль", как написано в задании.

    • Автор:

      tony19
    • 6 лет назад
    • 0

  • Это арифметическая прогрессия:

    a_{1}=100,d=2,a_{n}=998\\a_{n}=a_{1}+d \timtes (n-1)\=\frac{a_{n}-a_{1}}{d}+1=\frac{998-100}{2}+1=450\\s=\frac{a_{1}+a{n}}{2} \times n=\frac{100+998}{2} \times 450=247050

    • Автор:

      chivas
    • 6 лет назад
    • 0
  • PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

    begin

     Range(100, 999, 2).Sum.Println;

    end.

    Результат247050

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years