Вводятся оценки по физике и математике. Вывести на экран «Молодец», если их сумма равна или более 9, в противном случае вывести «Подтянись» — Pascal(Паскаль)

uses crt;

var
  a, b: integer;

begin;
  clrscr;
  writeln('Введите оценки за контрольные работы по физике и математике после каждого пред. Enter');
  readln(a);
  readln(b);
  IF a + b >= 9 THEN
    writeln('Молодец !')
  ELSE
    writeln('Подтянись');

end.