Лекции по TURBO PASCAL

Самостоятельные задания.

Напишите программу для поиска НОД с использованием этой процедуры.
Как известно, НОК двух чисел всегда больше или равен большему из этих чисел. Переделайте процедуру так, чтобы она начинала искать с наибольшего числа.
Имеет место следующая формула: НОК (А, В) = (А*В) / НОД (А, В)

Составьте программу для нахождения НОК с использованием этой формулы и процедурой для нахождения НОД.