Задание 2. Заполните массив первыми N натуральными числами, начиная с X (значение X введите с клавиатуры). Например, заполнить массив 6 натуральными числами, начиная с 11.
На экране (вывод) Pasacal
A[1]=11
A[2]=12
A[3]=13
A[4]=14
A[5]=15
A[6]=16
Ответы на вопрос
Ответил BobbyFresnel
1
// PascalABC.NET
begin
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]}'.Println
end.
Приложения:
vladimir473:
Спасибо большое)
Новые вопросы
Химия,
1 год назад
Физика,
1 год назад
Алгебра,
1 год назад
Английский язык,
1 год назад
Информатика,
6 лет назад