Написать программу на Паскале, которая проверяет кратно ли 3 введённое целое число.

Если остаток от деления (mod) на 3 равен 0 - число кратно трем. Вот и вся программа.
Pascal не знаю, но догадаться не сложно
var a:integer;
begin
writeln('vvedite chislo a:');
readln(a);
if (a mod 3) = 0 then
writeln(a, ' кратно трем')
else
writeln(a, 'не кратно трем');
readln();
end.