// Условный оператор. Полная форма
var 
  x: integer := 5;
  y: integer := 3;

begin
  if x<y then
    writeln(x,'<',y)
  else writeln(y,'<',x);
end.