Регистрация
ketrinmaknamar
07.11.2021 09:13
Информатика
Есть ответ 👍

Решить.даны натуральные числа n,m; найти нод(n,m). использовать программу, включающую рекурсивную процедуру вычисления нод, основанную на соотношении нод(n,m)=нод(m,r), где r – остаток от деления n на m.(паскаль)

105
164
Посмотреть ответы 2

Ответы на вопрос:

Рина201
Рина201
4,5(24 оценок)
Var   a,b: integer; procedure nod(x,y: integer); begin   if x=y then writeln(x)               else if x> y then nod(x-y,y) else nod(x,y-x); end; begin   writeln('введите два числа ');   readln(a,b);   write('нод: ');   nod(a,b); end. тестовое решение: введите два числа 33 18 нод: 3
brandenberg
brandenberg
4,6(64 оценок)

У тебя стоит цикл с условием. Пока b не будет равен 4, цикл не закончится. c = 12 + 10 + 8 + 6 = 36

Популярно: Информатика