Составьте программу для вычисления значения выражения​

Ответ:

Program zadacha;

Var a,t,x:real;

begin

 readln(a,x);

 t:=1/(2*a)-sqrt(x*x+5)+4*a;

 print(t)

end.

Объяснение: