others/volume1/006.pas


1
2
3
4
5
6
7
8
9
10
11
12
13

uses cmath;

var
  a, b, g: int64;
  c, d: longint;

begin
  readln(a, b, c, d);
  a := a * d + b * c;
  b := b * d;
  g := gcd(a, b);
  writeln(a div g, ' ', b div g)
end.