Предмет: Информатика,
автор: slendrman9957
Найти наибольший делитель натурального чисел 12 18
slendrman9957:
Паскаль
var a, b: integer;
begin
writeln('Введите a и b');
readln(a, b);
while a<>b do
begin
if a>b
then a:=a-b
else b:=b-a
end;
write('Н0Д=',a)
end. Решение
begin
writeln('Введите a и b');
readln(a, b);
while a<>b do
begin
if a>b
then a:=a-b
else b:=b-a
end;
write('Н0Д=',a)
end. Решение
Ответы
Автор ответа:
1
НОД(18/12) = НОД(12/6) = НОД(6/0)
ОТВЕТ: 6
Похожие вопросы
Предмет: Українська мова,
автор: CTalkep2545
Предмет: Химия,
автор: Steve1431
Предмет: Математика,
автор: Flower2923
Предмет: Литература,
автор: танкист159
Предмет: Литература,
автор: СейтханАзамат