Напишите ** АЯ алгоритм сложения двух простых дробей (без сокращения дроби) ** Pascal ABC

Question

Напишите на АЯ алгоритм сложения двух простых дробей (без сокращения дроби)
на Pascal ABC

Answer 1

Var
    a, b, c, d: integer;

begin
    readln(a, b);
    readln(c, d);
    writeln(a * d + c * b, '/', b * d);
end.