Даны два числа а и b написать алгоритм этих чисел. вореанты ответов ; первое число больше число больше а=b

Program enot;
Var a,b: integer;
begin
read(a,b);
if a>b then write('первое число больше второго');
if a<b then write ('второе число больше первого');
if a=b then write('числа а=б');
end.