• Даны два числа a и b. Проверить кратность их суммы квадратов числу c. (Паскаль)

Ответы 2

  • vara,b,c,d:integer;beginreadln(a);readln(b);readln(c);d:=(a+b)mod sqr(c);if d=0 then beginwriteln ('Кратно'); end else writeln ('Не кратно');end.
  • Спасибо большое!))
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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