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

Question

Информатика

Ефросиньюшка

3 ноября, 06:21

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

+4

Ответы (1)

Знаете ответ на вопрос?

Ксенья · Answer 1

Var a:array[0 ... 100] of integer;

n, i:integer;

begin

writeln ('Введите количество элементов массива') ;

read (n) ;

for i:=0 to n-1 do read (a[i]) ;

for i:=0 to n-1 do

if i mod 2=0 then write (a[i],' ') ;

end.