дано целое число n >0 сформировать и вывести целочисленный массив размера n содержащий n первых положительных нечетных чисел
var
a : array [1..10000] of integer;
n, i : integer;
begin
writeln (N = );
read (n);
for i := 1 to n do
begin
a[i] := (i - 1) * 2 + 1;
write (a[i], );
end;
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
