Question

Составить алгоритм для решения задачи: Определить минимальное среди чисел a и б.в Паскале дам 50 баллов)​

Answer 1

program Hello;

var num1,num2:integer;

begin

 readln(num1);

 readln(num2);

 if(num1>num2)then

 begin

 writeln(num1);

 end

 else

 begin

 writeln(num2);

 end;

end.