Помогите!!! в программе паскаль adc..решить задачу, даны два различных вещественных числа, определить: какое из них больше)

Var x,y:real; begin   Readln(x,y);   If x>y then      Writeln ('Первое число больше')   elese   Writeln ('Второе число больше'); end.