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

Question

Информатика

Минна

18 октября, 12:56

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

+4

Ответы (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.