янбаян
26.12.2022 04:13

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
kpodavilnikova
27.08.2020 11:27
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

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

end.

Результат247050
0,0(0 оценок)
Ответ:
Masha20082606
27.08.2020 11:27

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

a_{1}=100,d=2,a_{n}=998\\a_{n}=a_{1}+d \timtes (n-1)\\n=\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

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота