Дано трёхзначное число. верно ли, что сумма цифр этого - вопрос №6448217 от olesay12345 29.03.2023 00:05

Question

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

olesay12345 · Answer

// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
Writeln(ReadlnString('n=').ToIntegers.Sum mod 3=0)
end.

Выводится True, если верно и False, если нет
Пример
n= 483
True

Замечание
Число может быть не обязательно трехзначным - количество цифр в нем не ограничено!