Написать алгоритм сложения двух обычных дробей вида а/b и с/d. НЕ
Написать метод сложения двух обыкновенных дробей вида а/b и с/d. НЕ СЛОВАМИ!
Задать свой вопрос
Павлюкович
Ден
На алгоритмическом языке? Или можно на паскале?
Ирка Жюрайтис
Алгоритмическом
1 ответ
Карина Жеманова
Эту задачку уже решали здесь. Но, если трудно выискать, то вот программка:
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 (y2gt;0)and(z2gt;0) do
if y2gt;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 xgt;0 then writeln(x,' ',y,'/',z) else writeln(y,'/',z);
end.
Пример:
1-я дробь (числитель и знаменатель):
3 4
2-я дробь (числитель и знаменатель):
5 6
1 7/12
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 (y2gt;0)and(z2gt;0) do
if y2gt;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 xgt;0 then writeln(x,' ',y,'/',z) else writeln(y,'/',z);
end.
Пример:
1-я дробь (числитель и знаменатель):
3 4
2-я дробь (числитель и знаменатель):
5 6
1 7/12
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
Облако тегов