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

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