Записать на языке Паскаль следующие выражение если число кратно 3, тогда вывести на экран ''да'', иначе вывести ''нет''

begin

 var a := ReadInteger();

 Print(a mod 3 = 0? True: False)

end.