дан массив чисел х=( х1,х2,....хк). вычислить корень из суммы квадратов элементов массива

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016begin  var a:=ArrRandom(ReadInteger('k='),-99,99); a.Println;  Writeln('Квадратный корень из суммы квадратов элементов равен ',    sqrt(a.Select(x->sqr(x)).Sum):0:5)end.Тестовое решениеk= 7-50 67 23 -80 -22 -5 68Квадратный корень из суммы квадратов элементов равен 138.02536