Составить программу которая выводит из двух слов большее. оба слова вводятся из клавиатуры через пробел

Var  a, b: string;
begin  readln(a);  readln(b);  if a > b then  begin    writeln(a)  end  else    writeln(b);end.