Решить задачу. Пользователь вводит 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.