СРОЧНО ПОЖАЛУЙСТА!!!!
Даны натуральные числа А и В ,обозначающие соответственно числитель и знаменатель дроби.Сократить дробь,т. е. найти такие натуральные числа P и Q не имеющие общих делителей ,что P/Q = A/B

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018// Внимание! Если программа не работает, обновите версию!uses NumLibABC;begin  var (a,b):=ReadInteger2('Введите числитель и знаменатель дроби:');  Frc(a,b).Printend.ПримерВведите числитель и знаменатель дроби: 360 29406/49