Подскажите пожалуйста!!!
Дано 2 числа a и b написать алгоритм для вывода минимум значение.
a=7
b=8

var a,b:longint;begin read(a,b); if a > b then writeln(b); if a < b then writeln(a); if a = b then writeln('Числа равны');end.

Это если числа вводятся с клавиатуры

var  a,b:longint;begin  read(a,b);  if a > b then    writeln(b);  if a < b then    writeln(a);  if a = b then     writeln('Числа равны');end.