Задать вопрос Регистрация
Помочь другим

  • (Паскаль)

    Являются ли числа А и B взаимно простыми

    НОД = 1

    (7,8) = 1

Ответы 1

  • Var x, y: Integer;

    BeginWriteln('Введите два числа');Readln(x,y); 

    while (x<>0) and (y<>0) do beginIf x>y Then x:=x Mod yElse y:=y Mod x;end;Writeln('НОД=', x+y); end.

    • Автор:

      jadaifjb
    • 7 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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