Условный оператор. Найти наибольший общий делитель чисел

@aba-111 · Регистрация: 30.05.2012

Author24 — интернет-сервис помощи студентам

даны натуральные числа n,m. найти наибольший общий делитель чисел n и m. Заранее спасибо))))

@Черный ворон · 30.05.2012, 11:04

Pascal

function nod( a, b: longint): longint; 
  begin
   while (a <> 0) and (b <> 0) do
     if a >= b then 
       a:= a mod b 
     else 
       b:= b mod a;
   nod:= a + b;
  end;

@aba-111 · 30.05.2012, 11:08 **[ТС]**

большое спасибо)))))

@aba-111 0 / 0 / 0 Регистрация: 30.05.2012 Сообщений: 6
		1
	Условный оператор. Найти наибольший общий делитель чисел 30.05.2012, 10:44. Показов 1306. Ответов 2 Метки нет (Все метки) даны натуральные числа n,m. найти наибольший общий делитель чисел n и m. Заранее спасибо)))) 0

@aba-111 0 / 0 / 0 Регистрация: 30.05.2012 Сообщений: 6
	30.05.2012, 11:08 [ТС]	3
	большое спасибо))))) 0

Условный оператор. Найти наибольший общий делитель чисел

Решение