Написать программу на Паскаль, которая вычисляет корень из модуля большего числа (всего вводится 2 числа)

Предыдущий
вопрос Следующий
вопрос

program SqrtOfMax;
var
a, b, maxNum: real;
begin
writeln('Enter two numbers:');
readln(a, b);

if abs(a) > abs(b) then
maxNum := a
else
maxNum := b;

writeln('Square root of the maximum number:', sqrt(abs(maxNum)):0:2);
end.