1) After finishing the university I’ll travel for one year.
2) Then I’ll look for a job.
3) When I find it, I will work very hard.
4) After a few years I will earn enough money to buy a flat.
5) When I buy I a flat, I will take a cat and a dog from a shelter.
6) Next, I will probably marry, however, I haven’t decided it yet.
7) Then I will try to open my own business because I want to work for myself.
8) If I succeed, I will move to beautiful islands and will start living there.
9) If I don’t succeed, I will continue my work and will buy a beautiful country house.
10) When I buy a country house, I will ask my friends over every week.
11) We will always have a good time and a lot of fun.
12) I’m sure that I will become a very good specialist and I’ll always remember the teachers from my university.
13) Also, I’ll take a few hobbies and master a few languages.
14) I’ll take part in charity projects and write a book.
15) I’ll have long and happy life.
var a,b,c,d,e,f,k:longint;
function nod(a,b:longint):longint;
begin
if a=b then nod:=a else if a>b then nod:=nod(a-b,b) else nod:=nod(b-a,a);
end;
begin
clrscr;
write('A/B C/D -> ');
readln(a,b,c,d);
e:=a*d-b*c;
f:=b*d;
k:=nod(e,f);
e:=e div k;
f:=f div k;
writeln(a,'/',b,' - ',c,'/',d,' = ',e,'/',f);
readln;
end.