(см. объяснение)
Объяснение:
Возможный вариант решения задачи на PascalABC.NET 3.2 сборка 1325:
begin
var a: array of integer := ArrRandom(10, 0, 10);
a.Println;
a.Select(x -> x*x).Println;
end.
Вывод:
5 9 5 0 2 9 2 7 7 1
25 81 25 0 4 81 4 49 49 1
(см. объяснение)
Объяснение:
Возможный вариант решения задачи на PascalABC.NET 3.2 сборка 1325:
begin
var a: array of integer := ArrRandom(10, 0, 10);
a.Println;
a.Select(x -> x*x).Println;
end.
Вывод:
5 9 5 0 2 9 2 7 7 1
25 81 25 0 4 81 4 49 49 1