@Vlavas

Реализовать в виде модуля набор подпрограмм для выполнения над обыкновенными дробями вида P/Q (где Р − целое число, Q − натуральное число) следующих операций: сло¬жения, вычитания, умножения, деления, сокращения, возведе¬ния в степень N (где N − натуральное число), а также функций, реализующих операции отношения (равно, не равно, больше или равно, меньше или равно, больше, меньше).
При этом дробь представить следующим типом:
Type Frac = Record
Р : Integer;
Q : 1. . 32767
End;
Создать программу, использующую этот модуль. Программа должна формировать массив А, элементы которого − обыкновенные дроби, и выполнять следующие задачи:
а) Найти сумму всех элементов. Ответ представить в виде несократимой дроби.
б) Отсортировать массив в порядке возрастания.
в) Найти разность максимального и минимального элементов массива.
г) Вычислить произведение двух дробей с указанными номерами.
д) Возвести дробь с указанным номером в степень N.
е) Найти в массиве все дроби, большие указанного значения.
ж) Найти в массиве все дроби, значение которых находится в интервале между первой и последней дробью массива.
з) Найти в массиве все дроби, значение которых равно разности первой и последней дроби.
и) Найти сумму дробей с нечетными номерами.
к) Найти произведение двух дробей с минимальными значениями.
л) Найти три дроби с максимальным значением.

0

@ZX Spectrum-128

Модуль: арифметические действия с обыкновенными дробями

Добавлено через 1 минуту
Создайте свой собственный модуль для работы с обыкновенными дробями
Модули. Реализовать в виде модуля набор подпрограмм для выполнения над обыкновенными дробями
Реализовать в виде модуля набор подпрограмм для выполнения операций над обыкновенными дробями

0