Сформировать две новые последовательности Х и У [Паскаль]

[Анна22]

Даны три числовые последовательности a,b,c. Сформировать две новые последовательности х и у в соответствии со следующим правилом:
Xi=√׀ai*bi׀ ; yi=√׀bi*ci׀; i=1,2,….n(звездочка эт умножить!!!)

[Mad_Cat]

for i:=1 to n do
begin
x[i]:=sqrt(abs(a[i]*b[i]));y[i]:=sqrt(abs(c[i]*b[i]));
end;