Дан массив, состоящий из целых чисел. Нумерация элементов начинается с 0. Напишите программу, которая выведет элементы массива, номера которых четны (0, 2, 4...).

Program n1;const n=11;var a: array[0..n] of integer;i: integer;beginfor i:=0 to n dobegina[i]:=random(10);if i mod 2=0 then write(a[i],' ');end;end.