Question

Подсчитать сумму всех элементов кратных 2 , в массиве из 10 чисел

Answer 1

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
  var a:=ArrRandom(10,1,30); a.Println;
  Writeln('Сумма четных чисел равна ',a.Where(x->x.IsEven).Sum)
end.

Пример
27 11 27 26 20 17 26 20 3 25
Сумма четных чисел равна 92

Answer 2

Ну учитель не поймет, что я сделаю!!

Answer 3

А это Ваша проблема и Вашего учителя.

Answer 4

НОРМАЛЬНЫЕ школьники, которые ходят на занятия, пишут в вопросе название языка и указывают его версию. И тогда получают именно то, что им надо.

Answer 5

ну почему нельзя помочь и написать по другому?!?

Answer 6

Потому, что написать можно 10 или 20 разными способами. И только тот, кто чужой труд не уважает. может так небрежно писать вопрос, а получив ответ, заявлять "мне надо не так!". Причем, даже не указав при этом, как именно надо.