Определите из двух девочек старшую — Pascal(Паскаль)

uses crt;

var
  adge1, adge2: integer;

begin;
  clrscr;
  writeln('Введите годы рождения девочек (первой и второй после каждой ENTER)');
  readln(adge1, adge2);
  iF adge1 < adge2 THEN
    writeln('Первая девочка старше')
  ELSE
    writeln('Вторая девочка старше');

end.