Дано трёхзначное число. Верно ли, что сумма цифр этого числа будет кратна 3? программа на пскаль

// PascalABC.NET 3.2, сборка 1338 от 16.11.2016begin  Writeln(ReadlnString('n=').ToIntegers.Sum mod 3=0)end.Выводится True, если верно и False, если нетПримерn= 483TrueЗамечаниеЧисло может быть не обязательно трехзначным - количество цифр в нем не ограничено!