задача 5 урок 9:

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

var A, B: real;
begin
  writeln('vvedite chislo A: ');
  readln(A);
  writeln('vvedite chislo B: ');
  readln(B);

  if (A > B) then
      writeln(A)
  else
      writeln(B);

  readln();
end.