Помогите Из двух векторов x={x1, x2, …, x16} и y={y1, y2, …, y16} определить тот, у которого больше длина.Паскаль,через массив.

// PascalABC.NEt 3.4

begin
  var x:=ArrRandom(16,-50,50); x.Println;
  var y:=ArrRandom(16,-50,50); y.Println;
  var s1:=x.Select(p->p*p).Sum;
  var s2:=y.Select(p->p*p).Sum;
  if s1>s2 then Writeln('Вектор x длиннее')
  else if s1   else Writeln('Длины векторов одинаковы')
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.