Помогите умоляю!!! введите два числа a, b. Выведите на экран порядковый номер меньшнго из них. 

program qq;var a,b:integer;beginwriteln('Введите число a');readln(a);writeln('Введите число b');readln(b);if a>b then writeln(b);orwriteln(a);end.