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

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
  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