Найдите сумму 5 первых натуральных чисел ,больше 100,и кратные 123 ПАСКАЛЬ !!!!!

Question

Найдите сумму 5 первых натуральных чисел ,больше 100,и кратные 123 ПАСКАЛЬ !!!!!

Comments

Программа? Посчитать? А зачем тогда алгебру учат в школе?

---

Я же не могу сказать это своему информатику )

---

Можете.

---

Программы пишут, когда посчитать невозможно или сложно, или долго.

---

А это просто сумма арифметической прогрессии.

---

Это задача информатика ! Тут нужно составить программу для вычисления...

---

Хорошо...вот Вам программа

---

// PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018// Внимание! Если программа не работает, обновите версию!begin SeqGen(5, i -> 123 * i, 1).Sum.Printlnend.

---

Ок СПАСИБО

---

Пожалуйста. Все равно 1845 получится))

Answer 1

Program n1;
var sum,i: integer;
begin
sum:=0;
for i:=1 to 5 do sum:=sum+123*i;
write(sum);
end.