Question

Ввести массив состоящий из нечетных чисел(Формула)

Answer 1

program mas_nech_ch;

const n=10;

var

p:array[1..n] of integer;

i:integer;

begin

for i:=1 to n do begin

p[i]:=i*2-1;

write(p[i],' ');

end;

end.