Без использования клавиатуры заполнить массив - вопрос №6927206 от Kleira 24.07.2022 12:49

Question

Информатика: Без использования клавиатуры заполнить массив следующей числовой последовательностью(количество элемента массива вводится с клавиатуры): 1 4 9 16 25?

Kleira · Answer

// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrGen(ReadInteger('n='),i->i*i,1); a.Println;
end.

Пример
n= 10
1 4 9 16 25 36 49 64 81 100