Составить алгоритм по сравнению 2 чисел и опишите каждое действие по информатике ! заранее

1. Определяем что больше
2. Делаем блок схему
3. Пишем результат

Program A1;
var a,b:Integer; {Можно и real}
begin
readln (a,b);
if a<b then writeln ('Число а больше числа б') else writeln ('Число б больше числа а');
end.