Решить алгоритмом блок схемой вот задание) Определить и вывести меньшее из двух вводимых чисел))
var a,b:integer; begin write('Введите первое число: '); readln(a); write('Введите второе число: '); readln(b); if a>b then writeln('Меньшее число: ',b) else writeln('Меньшее число: ',a) end.