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