Тертий
6 год назад
Помогите пожалуйста!!!
Напишите программу для нахождения наибольшего общего делителя двух чисел с использованием процедуры. Найти наибольший общий делитель для чисел 12, 24, 30, 48 и 51
ОТВЕТЫ
Стоцкий
Aug 7, 2019
var a,b: integer;
function NOD(x,y: integer): integer;
begin;
if xlt;gt;0 then NOD:=NOD(y mod x,x) else NOD:=y;
end;
begin;
readln(a,b);
writeln( НОД = , NOD(a,b) );
end.
Такой вопрос уже был... на этом сайте
function NOD(x,y: integer): integer;
begin;
if xlt;gt;0 then NOD:=NOD(y mod x,x) else NOD:=y;
end;
begin;
readln(a,b);
writeln( НОД = , NOD(a,b) );
end.
Такой вопрос уже был... на этом сайте
115
Смежные вопросы:
