Нужно найти сумму четных чисел от 1 до 100 с помощью программы PascalABC. Правильно ли я...

Question

Нужно найти сумму четных чисел от 1 до 100 с помощью программы PascalABC. Правильно ли я сделала? А если нет, то не могли бы вы мне помощь? Желательно I mod.

---

Comments

Почему 'i mod 1=0'?

---

Правильно: i mod 2 = 0

---

А, спасибо большое:)

---

А в других местах все правильно, надеюсь?

---

Да

---

Еще раз спасибо:) Помогли

Answer 1

Для проверки результата.
begin
seqgen(100, x -> x + 1, 0).Where(x -> x mod 2 = 0).Sum.ToString.Println;
end.

Comments

Спасибо