Дано число определить делится оно ** три? (** языке программирования)

Question

Дано число определить делится оно на три? (На языке программирования)

---

Answer 1

Program n1;
var a: integer;
begin
readln(a);
if a mod 3=0 then writeln('делится') else writeln('не делится');
end.