| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Центр помощи > [Delphi] КЛАССЫ И ОБЪЕКТЫ |
| Автор: AStorBOG 18.5.2014, 08:31 |
| Рациональная (несократимая) дробь представляется парой целых чисел (а, b), где а — числитель, b — знаменатель. Создать класс Rational для работы с рациональными дробями. Обязательно должны быть реализованы операции: сложения add, (а, b) + (с, d) = (ad + bc, bd) вычитания sub, (a, b) - (с, d) = (ad - bc, bd) умножения mul, (a, b) × (c, d) = (ac, bd) деления div, (a, b) / (c, d) = (ad, bc) сравнения equal, greate, less. Должна быть реализована приватная функция сокращения дроби reduce, которая обязательно вызывается при выполнении арифметических операций. |