Задание 2. Заполните массив первыми N натуральными - вопрос №118405972 от nadia291 26.06.2021 10:15

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

nadia291 · 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....