Заполнить массив из 15 элементов первыми натуральными нечетными числами и распечатать в столбик

Vlada2005Bee Vlada2005Bee    2   21.05.2019 19:50    1

Ответы
antanika2000 antanika2000  16.06.2020 17:45

var

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

i:byte;

begin

a[1]:=1;

writeln (a[1]); 

for i:=2 to 15 do begin

a[i]:=a[i-1]+2;

writeln (a[i]);

end;

readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика