47

НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ. НАЙТИ НАИБОЛЬШИЙ ОБЩИЙ ДЕЛИТЕЛЬ 2 НАТУРАЛЬНЫХЧИСЕЛ!

15 апреля 2023

НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ. НАЙТИ НАИБОЛЬШИЙ ОБЩИЙ ДЕЛИТЕЛЬ 2 НАТУРАЛЬНЫХЧИСЕЛ!

категория: информатика

39

program prim; uses crt; var x,y: integer; begin writeln ('введите x,y'); readln (x,y); while x<>y do begin if x>y then x: =x-y else y: =y-x end; write ('НОД=',x); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...