Помогите с кодом на Pascal!!!

Написала код. Всё работает, но при этом вычисления не верные. Сижу над ним долго, но понять, в чём же проблема, так и не смогла.
Задача: Напишите программный код на языке Паскаль для решения следующей задачи.
Даны переменные a и b, значения которых нужно ввести с клавиатуры. Вычислите значение функции Z (a, b).

В приведённой функции есть повторяющиеся конструкции a2 + b2, которые необходимо посчитать один раз, а затем использовать результат вычислений. Разбейте сложное вычисление одного выражения на простые вычисления для облегчения ввода результирующей формулы.
Код:
program homework;
uses math;
var a, b, Z, n, z1, z2, z3: real;
begin
write('Введите значение двух переменных a и b: ');
readln(a,b);
n:=sqr(a)+sqr(b);
z1:=power(n,1/4);
z2:=sin(n);
z3:=1/n;
Z:=z1+z2-z3;
writeln(Z)
end.
Его работа:
Free Pascal Compiler version 3.2.2+dfsg-9ubuntu1 [2022/04/11] for x86_64
Copyright (c) 1993-2021 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling main.pas
Linking a.out
12 lines compiled, 0.2 sec
Введите значение двух переменных a и b: 4
5
2.3474266217280952E+000

...Program finished with exit code 0
Press ENTER to exit console.
Вычисление самого выражения: