это урок информатики и тема программирование на Паскаль
Нужно сделать 8 вариант

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.