program array1; var a: array[1..10] of integer; N, i: integer; begin write('Введите N: '); readln(N); a[1] := 1; for i := 2 to N do a[i] := a[i - 1] + 2; for i := 1 to N do write(a[i],' ')end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку