Pascal. Ввести массив 15 случайных чисел. Вывести ** экран элементы только с чёрными...

0 голосов
43 просмотров

Pascal. Ввести массив 15 случайных чисел. Вывести на экран элементы только с чёрными индексами. Срочно 25 баллов


Информатика (15 баллов) | 43 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=15;
  var a:=ArrRandom(n,-99,99); a.Println;
  Range(2,n,2).Select(t->a[t-1]).Println
end.

Пример
21 -19 -93 -18 -16 -58 -91 21 -74 85 -60 -16 68 31 72
-19 -18 -58 21 85 -16 31
(150k баллов)