Ввести c клавиатуры массив из 9 элементов, вывести каждый третий элемент массива....

Question

Ввести c клавиатуры массив из 9 элементов, вывести каждый третий элемент массива. Паскаль, 10 класс

Answer 1

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  var a:=ReadArrInteger(9);
  a.Where((x,i)->i mod 3 =2).Println
end.

Тестовое решение:
5 8 -3 6 8 11 4 9 7
-3 11 7