Регистрация
MainkraeTV
07.01.2020 19:17
Информатика
Есть ответ 👍

Даны две дроби a/b и c/d где a,b,c,d натуральные числа.требуется найти их сумму и записать в виде x y/z(или y/x,если x=0), где y/z-несократимая дробь. составьте программу для решения этой .

100
411
Посмотреть ответы 2

Ответы на вопрос:

мадя21
мадя21
4,7(95 оценок)
Var a,b,c,d,x,y,z,y1,z1,y2,z2,nod: integer; begin writeln('1-я дробь (числитель и знаменатель): '); readln(a,b); writeln('2-я дробь (числитель и знаменатель): '); readln(c,d); y1: =a*d+c*b; y2: =y1; z1: =b*d; z2: =z1; while (y2> 0)and(z2> 0) do   if y2> z2 then y2: =y2 mod z2 else z2: =z2 mod y2; nod: =y2+z2; y1: =y1 div nod;   z: =z1 div nod; x: =y1 div z; y: =y1 mod z; if x> 0 then writeln(x,' ',y,'/',z) else writeln(y,'/',z); end. пример: 1-я дробь (числитель и знаменатель): 1 10 2-я дробь (числитель и знаменатель): 2 5 1/2
Vrentor
Vrentor
4,6(98 оценок)

1.хотстинг

2.наповнення

3.підтримка

4.дизайн домен

7.Програмування

Популярно: Информатика