Составить программу проверяющую что введённое число делится без остатка на 3 ( Паскаль)

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

program divideByThree;

var
number: integer;

begin
writeln('Enter a number: ');
readln(number);

if (number mod 3 = 0) then
writeln('The number can be divided by 3 without a remainder')
else
writeln('The number cannot be divided by 3 without a remainder');
end.