• Помогите пожалуйста
    Даны две сцепленные шестеренки. У одной шестеренки N зубцов, у другой – K. Требуется найти, какое минимальное число поворотов на один зубчик требуется сделать, чтобы шестеренки вернулись в исходное состояние.

    Входные данные
    В единственной строке --- два натуральных числа N и K, не превосходящих 10 миллионов.

    Выходные данные
    Выведите искомое количество зубчиков. Гарантируется, что оно не более миллиарда.

Ответы 1

  • var N,K,R: integer; x,s: integer;begin read(N,K); R := N; x := 2; s := 4; while s <= K do  begin  while K mod x = 0 do    begin    if N mod x = 0 then      N := N div x    else      R := R * x;    K := K div x;    end;  s := s + 2*x + 1;  x := x + 1;  end;  if N mod K <> 0 then    R := R * K;  writeln(R)end.
  • Добавить свой ответ

Войти через Google

или

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

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

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