Question

ДАЮ 100 БАЛЛОВ
Переведите функцию на язык программирования
Написать на языке программного выражения

Answer 1

Program n1;
var x,l,t,k,m,res: real;
begin
readln(x,l,t,k,m);
res:=sqr((t*t-k*k)/(sqr(sqr(m))-l*sqr(l)))+sqrt(abs((sqrt(x+4))/(12-abs(x))+4));
write(res);
end.