Выведи на экран большее из двух данных чисел. запиши программу на языке паскаль, выведи ответ на экран, если1,16505 и 2,3468.

Var num1,num2:real;
begin
write('Введите первое число: '); readln(num1);
write('Ведомое второе число: '); readln(num2);
writeln('Наибольшее число: ');
if (num1 > num2) then writeln(num1)
else writeln(num2)
end.