Напишите на языке Паскаля.Дано число. Является ли оно двухзначным чётным,кратное трём

Предыдущий
вопрос Следующий
вопрос

program TwoDigitEvenMultipleOfThree;
var
number: integer;
begin
write('Enter a number: ');
readln(number);
if (number >= 10) and (number <= 99) and (number mod 2 = 0) and (number mod 3 = 0) then
writeln('The number is a two-digit even multiple of three')
else
writeln('The number is not a two-digit even multiple of three');
end.