Дан список, элементы которого являются целыми числами. Найти сумму четных элементов первой половины списка

@Morales Incva · Регистрация: 07.06.2018

Дан список, элементы которого являются целыми числами. Найти сумму четных элементов первой половины списка.
Через процедуры и функции

@JuriiMW · 19.12.2018, 12:06

Pascal

begin
  var L:=ArrRandomInteger(ReadInteger).ToList;
  L.Println;
  L[:L.Count div 2].Where(x->not odd(x)).Sum.Println;
end.

@Morales Incva 1 / 1 / 0 Регистрация: 07.06.2018 Сообщений: 62
		1
	Дан список, элементы которого являются целыми числами. Найти сумму четных элементов первой половины списка 19.12.2018, 11:43. Показов 818. Ответов 1 Метки нет (Все метки) Дан список, элементы которого являются целыми числами. Найти сумму четных элементов первой половины списка. Через процедуры и функции 0

	19.12.2018, 12:06