Написать код в pascal. Нужно написать программу в паскале, которая находит наименьшее...

Question

Написать код в pascal.

Нужно написать программу в паскале, которая находит наименьшее число из двух введенных.

Даю все баллы, помогите, чуваки(

Answer 1

Var
a,b:integer;
begin
writeln('Введите 2 числа: ');
readln(a,b);
if a>b then writeln('Наименьшее число - ',b)
else
writeln('Наименьшее число - ',a)
end.

Answer 2

//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

  var (a,b):=readinteger2('Введите a,b->');

  if a>b then writeln('наименьшее число ',b) else

  writeln('наименьшее число ',a)

end.