Даны две дроби а/в и с/d (a,в,c,d — натуральные числа). составьте программу вычитания из первой дроби второй. ответ должен быть несократимой дробью. использовать подпрограмму алгоритма евклида для определения нод.

131

175

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

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

uliana2007zvez

Информатика

4,6(54 оценок)

// pascalabc.net 3.1, сборка 1201 от 18.03.2016 function euclid(a,b: integer): integer; begin while a< > b do if a> b then a-=b else b-=a; result: =a end; begin var a,b,c,d: integer; write('числитель и знаменатель первой дроби: '); read(a,b); write('числитель и знаменатель второй дроби: '); read(c,d); var zn: =b*d; var ch: =a*d-c*b; var sgn: =sign(ch); ch: =abs(ch); var gcd: =euclid(ch,zn); write('результат вычитания: '); if sgn=-1 then write('-'); writeln(ch div gcd,'/',zn div gcd) end. тестовое решение: числитель и знаменатель первой дроби: 7 12 числитель и знаменатель второй дроби: 3 4 результат вычитания: -1/6