Записать на языке Паскаль следующие выражение если число кратно 3, тогда вывести на экран ''да'', иначе вывести ''нет''
begin
var a := ReadInteger();
Print(a mod 3 = 0? True: False)
end.
If a mod 3 =0 then writeln(‘Да’) Else writeln(‘Нет’);