IMHO.WS - Помогите плиз с алгоритмом приведения дробей к общему знаменателю

IMHO.WS (https://www.imho.ws/index.php)

- Программирование (https://www.imho.ws/forumdisplay.php?f=40)

Помогите плиз с алгоритмом приведения дробей к общему знаменателю

Помогите плиз с алгоритмом приведения дробей к общему знаменателю
78. Даны дроби p1/q1, p2/q2, ..., pn/qn (pi, qi – натуральные). Составить программу, которая приводит эти дроби к общему знаменателю и упорядочивает их в порядке возрастания.
Плииииииииииииииз :)

На Паскале:

Цитата:

function NOD(x,y:longint):longint;
begin
if x<>0 then NOD:=NOD(y mod x,x) else NOD:=y;
end;

function NOK(x,y:longint):longint;
begin
NOK:=( x div NOD(x,y) ) * y;
end;

НОК знаменателей двух дробей и будет твой общий знаменатель.
Для сравнения дробей просто приводи их к десятичной форме, т.е. дели числитель на знаменатель. А такие числа уже можно сравнивать в том же операторе if.

Для организации хранения в программе простых дробей видимо придется описать соответствующие структуры.
Вот тебе пример на Паскале, где реализовано хранение простых дробей и все основные операции http://www.mai.ru/org/auditory/program/pas/solver/solv0002.htm

Аналогичный пример на С:

Цитата:

int NOD(int a,int b)
{
while(a && b)
{
if(a>b) a=a%b;
else b=b%a;
}
return a+b; // Одно - ноль
}

int NOK(int x, int y)
{
return x * y / NOD(x, y);
}

int NOK(int x, int y, int z)
{
return NOK(NOK(x, y), z);
}

Цитата:

ЕЖ:
Для сравнения дробей просто приводи их к десятичной форме, т.е. дели числитель на знаменатель. А такие числа уже можно сравнивать в том же операторе if.

Нафиг делить, если знаменатель уже одинаковый? Просто нужно провести сортировку по числителям безо всякого деления.

Цитата:

Trotil:
Нафиг делить, если знаменатель уже одинаковый? Просто нужно провести сортировку по числителям безо всякого деления.

Прав, просто я не обратил внимание, что сортировать надо после приведения к общему знаменателю :)

Всем спасибо, тема закрыта :)