Урок №9 Задание 7

Урок №9 Задание 7

Пользователь вводит два числа, найдите из них максимальное

program Pr9_7;

var a,b:integer;

begin
  writeln('Введите два числа: ');
  readln(a,b);

  if (a>b) then
     writeln('A>B')
  else
     writeln('B>A');

  readln();
end.         

Консоль:

Введите два числа:
2
4
B>A