Составьте программу ввода с клавиатуртуры элементов массива a [1 ... 10] и вывода на экран элементов с четными индексами.

Question

Информатика

Епистима

7 мая, 07:17

Составьте программу ввода с клавиатуртуры элементов массива a [1 ... 10] и вывода на экран элементов с четными индексами.

+1

Ответы (1)

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

Дашуля · Answer 1

Var

a:array[1 ... 10] of integer;

i:integer;

begin

for i:=1 to 10 do readln (a[i]) ;

i:=2;

while i<=10 do

begin

writeln (a[i]) ;

inc (i, 2) ;

end;

readln;

end.