Даны х у z напишите программу для вычисления значения выражений а= x+y-z / x²+ 2

Var
x,y,z:real;
begin
Read(x,y,z);
Writeln('a = ', (x+y-z)/(x*x +2));
end.

Пример:
3 4 1.23
a = 0.524545454545455