Напишите программу в Pascal

компьютер спрашивает возраст и стаж, на работу принимает если кандидат старше 25 лет и имеет стаж не менее 10 лет

var a, b:integer;

begin

writeln ('Сколько вам лет, и каков ваш стаж?');

Writeln ('Возраст');

read (a);

Writeln ('Стаж');

read (b);

if (a>25) and (b>10) then begin

Writeln ('Вы приняты');

end

else begin

writeln ('Извините, вы не приняты');

end;

end.