Question

Решить алгоритмом блок схемой вот задание) Определить и вывести меньшее из двух вводимых чисел))

Answer 1

var
a,b:integer;
begin
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
if a>b then writeln('Меньшее число: ',b)
        else writeln('Меньшее число: ',a)
end.