Помогите пожалуйста, только обведённый номер. Линейные алгоритмы. Составить программу вычисления значения выражения.
uses crt;
var x, y, a:real;
begin
read(x, y);
a:=(sqrt((abs(x))+(abs(y))));
a:=a/(sqrt(x*x+1));
writeln(a);
end.