Ввести с клавиатуры два числа и вывести ** экран минимальное

Question

Ввести с клавиатуры два числа и вывести на экран минимальное

Answer 1

var a, b:longint;

begin

readln(a, b);

if a>b then writeln(b)

         else writeln(a);

end.