Без использования клавиатуры заполнить массив следующей - вопрос №6928108 от Dania0609 03.10.2022 07:44

Question

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

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