Задание 2. Заполните массив первыми N натуральными - вопрос №211840095 от klybnika228 23.04.2022 09:08

Question

Информатика: Задание 2. Заполните массив первыми N натуральными числами, начиная с X (значение X введите с клавиатуры). Например, заполнить массив 6 натуральными числами, начиная с 11. На экране (вывод) A[1]=11 A[2]=12 A[3]=13 A[4]=14 A[5]=15 A[6]=16

klybnika228 · Answer

// PascalABC.NETbegin  var (n, x) := ReadInteger2( Введите N и X: );  var a := ArrGen(n, x, p - p + 1);  for var i := 0 to a.High do    $ A[{i+1}]={a[i]} .Printlnend....