• Дано  трёхзначное число. Определить,кратна ли трём сумма кубов его цифр.

Ответы 3

  • но как мы узнали кратно трём или нет??
  • по остатку от деления смотрим
    • Автор:

      happypsae
    • 6 лет назад
    • 0
  • var n, s: integer;begin  readln(n);  n := abs(n);  while n <> 0 do begin    s := s + Trunc(Power(n mod 10, 3));    n := n div 10;  end;  writeln(s mod 3 = 0);end.
    • Автор:

      giovanna
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years