Написать прогрумму, которая заменяет массив А нечетными натуральными числами от 1 до N (N вводится с клавиатуры)

Question

Информатика

Веселина

15 апреля, 05:22

Написать прогрумму, которая заменяет массив А нечетными натуральными числами от 1 до N (N вводится с клавиатуры)

+1

Ответы (1)

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

Манюся · Answer 1

Var

i, n:integer;

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

begin

readln (n) ;

i:=1;

while i<=n do

begin

a[i]:=i;

write (a[i],' ') ;

i:=i+2;

end;

end.