введите 10 элементов массива и возведите их в квадрат

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var a := ReadArrInteger(10);

 a.Transform(t -> t * t);

 a.Println

end.

Пример

-49 -26 9 -49 17 14 -13 26 49 28

2401 676 81 2401 289 196 169 676 2401 784