Найти наибольшее значение двух выражений : x+5 , x+y+3

// PascalABC.NET 3.2, сборка 1437 от 03.05.2017

begin
  var x,y:real;
  Read(x,y); Writeln('максимум равен ',Max(x+5,x+y+3))
end.