Написать программу нахождения наибольшего общего делителя

Question

Написать программу нахождения наибольшего общего делителя (НОД) двух натуральных чисел. А) использовать оператор repeatб) использовать операторwhile

Answer 1

46

lybolya

05 апреля 2023

var a,b: integer; function NOD (x,y: integer): integer; begin if x<>0 then NOD: =NOD (y mod x,x) else NOD: =y; end; begin readln (a,b); writeln ('НОД=', NOD (a,b); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: