program 8var;
uses math;
var
x, y, z: real;
begin
writeln('Vvedite x - ');
readln(x);
writeln('Vvedite y - ');
readln(y);
z:=sqrt(abs(((sqrt(x)+y)/(12-abs(x)))+4);
writeln('Otvet - ', z);
readln();
end.
program 8var;
uses math;
var
x, y, z: real;
begin
writeln('Vvedite x - ');
readln(x);
writeln('Vvedite y - ');
readln(y);
z:=sqrt(abs(((sqrt(x)+y)/(12-abs(x)))+4);
writeln('Otvet - ', z);
readln();
end.