Составить любой словесный и графический алгоритм нахождение наибольшего из двух чисел​

var

a,b:integer;

begin

writeln('Введите два числа');

 readln(a,b);

if a>b then

writeln ('Первое число больше , то есть',a, ')

else

writeln ('Второе число больше , то есть',b, ');

end.