Question

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

Answer 1

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