Составить алгоритм для вычисления значений выражения. На Pascal
Var a,b,c:real; begin readln(b, c); a:= (b*b + c*c) / ( 10 + abs( b*c ) ) writeln(a); end;