Задание 2. Заполните массив первыми N натуральными - вопрос №211840263 от karrygreenk 12.06.2022 11:10

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

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