Решить задачу. Пользователь вводит 2 числа, вывести на экран максимальное и минимальное из этих 2 чисел. Если числа равны, вывести на экран "a=b". ПОМОГИТЕ, СРОЧНО!!!

program task1; var     a, b: integer;     begin     writeln('Введите 1 число: ');     read(a);     writeln('Введите 2 число: ');     read(b);         if a > b then         begin             write('Максимальное: ', a);             write('Минимальное: ', b);         end     else if a = b then         write('a = b')     else         begin             write('Максимальное: ', b);             write('Минимальное: ', a);         end; end.