Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/40: Рейтинг темы: голосов - 40, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 22.09.2013
Сообщений: 24
1

Даны n натуральных чисел. Найти их наибольший общий делитель, учитывая что НОД(а,б,с)=НОД(НОД(а,б)с)

18.10.2013, 13:45. Показов 7408. Ответов 4
Метки нет (Все метки)

даны n натуральных чисел. Найти их наибольший общий делитель, учитывая, что НОД(a,b,c) = НОД (НОД(a,b)c). При решении определите функцию для расчета наибольшего общего делителя двух натуральных чисел, используя алгоритм Евклида. НАПИШИТЕ КТО НИБУДЬ КОД В ПАСКАЛЕ ВАЩЕ ЧЕТ НЕ ВРУБАЮСЬ КАК ЭТО (
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.10.2013, 13:45
Ответы с готовыми решениями:

Даны натуральные числа m, n. Вычислить наибольший общий делитель чисел m, n (НОД), используя рекурсивную функцию вычисления НОД.
Даны натуральные числа m, n. Вычислить наибольший общий делитель чисел m, n (НОД), используя...

Найти НОД (наибольший общий делитель) двух натуральных чисел по алгоритму Евклида
Найти НОД (наибольший общий делитель) двух натуральных чисел по алгоритму Евклида. Если есть 2...

Используя Алгоритм Евклида найти наибольший общий делитель (НОД) двух неотрицательных чисел
Используя Алгоритм Евклида найти наибольший общий делитель (НОД) двух неотрицательных чисел, с...

Найти наибольший общий делитель (НОД) двух натуральных чисел M и N по алгоритму Евклида
Найти наибольший общий делитель (НОД) двух натуральных чисел M и N по алгоритму Евклида. Если M >...

4
Почетный модератор
64087 / 47496 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
18.10.2013, 14:10 2
Лучший ответ Сообщение было отмечено Приротехника как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
function NOD(a,b:longint):longint;
begin
repeat
if a>b then a:=a mod b
else b:=b mod a;
until (a=0)or(b=0);
NOD:=a+b;
end;
var a,b,c:longint;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
writeln;
writeln('NOD(a,b,c)=',NOD(NOD(a,b),c));
readln
end.
1
0 / 0 / 0
Регистрация: 01.12.2018
Сообщений: 1
01.12.2018, 15:17 3
а можно набросать блок схемму для этой задачи ?
0
Платежеспособный зверь
8754 / 4185 / 1608
Регистрация: 28.10.2009
Сообщений: 11,324
01.12.2018, 15:39 4
Puporev, это всё хорошо, но в условии-то не 3 числа, а n...
0
Почетный модератор
64087 / 47496 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
01.12.2018, 15:44 5
Да и черт с ним, 5 лет пошло, может тогда пьяный был, все равно ни Приротехника, ни ZloySuslik, даже не врубились, а ты думаю и сам сможешь блок-схему нарисовать.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.12.2018, 15:44

Найти наибольший общий делитель чисел M и N. Используйте теорему Эйлера: Если M делится на N, то НОД (N, M)=N, иначе НОД (N, M)= =НОД (M mod N, N).
Найти наибольший общий делитель чисел M и N. Используйте теорему Эйлера: Если M делится на N, то...

Найти НОД (наибольший общий делитель) массива натуральных чисел
Найти НОД (наибольший общий делитель) массива натуральных чисел. Спасибо за помощь :)

Найти наибольший общий делитель (НОД) двух введенных натуральных чисел, используя алгоритм Евклида
Найти наибольший общий делитель (НОД) двух введенных натуральных чисел, используя алгоритм Евклида....

Вычислить НОД (наибольший общий делитель) двух натуральных чисел A и B
Задача 4. Вычислить НОД (наибольший общий делитель) двух натуральных чисел A и B.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru