Без использования клавиатуры заполнить массив следующей - вопрос №6927206 от omanivchuk 26.01.2020 05:35

Question

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

omanivchuk · 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