Даны натуральные числа n,a1,a2...an. Найти члены последовательности: имеющие не четные порядковые номера и являющиеся не четными числами на паскале
Даны натуральные числа n,a1,a2...an. Найти члены последовательности: имеющие не четные порядковые номера и являющиеся не четными числами на паскале
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var a:=ArrRandom(ReadInteger('n='),1,99); a.Println;
a.Where((x,i)->x.IsOdd and i.IsEven).Println
end.
Тестовое решение
n= 15
28 46 39 14 63 47 84 11 98 46 28 49 15 67 5
39 63 15 5
Не нашли ответ?
Похожие вопросы