Напишите программу, которая в последовательности 10 натуральных чисел определяет сумму...

Question

Напишите программу, которая в последовательности 10 натуральных чисел определяет сумму чисел, кратных 6. Программа должна вывести число-сумма чисел,кратных 6

Answer 1

// PascalABC.NET 3.3, сборка 1549 от 17.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadSeqInteger(10).Where(x->x mod 6=0).Sum)
end.

Comments

все,до свидания! вы получиили баллы, так радуйтесь! я не собираюсь каждый день обновлять паскаль

---

так я не хожу в кафе,я хожу только в рестораны

---

так они меняют!

---

так я сказочница.я всем сказки подряд рассказываю