Números racionals P50688

Definiu un tipus @racional@ per a operar amb números racionals i implementeu les operacions següents:

    racional zero (); 
    racional fixa (int num, int den);
    
    int numerador ();
    int denominador ();

    racional sum (racional q1, racional q2);
    racional res (racional q1, racional q2);
    racional mul (racional q1, racional q2);
    racional div (racional q1, racional q2);
    
    double real (racional q);
    
    void escriure (racional q);
    

Observació

Només cal enviar el procediment demanat; el programa principal serà ignorat.