Fractions, addition, soustraction, multiplication, division et simplification

Télécharger le projet
Commenter

Description

Fractions est une unité pour Delphi 6 à plus qui permet donc d'effectuer des calculs sur les fractions.

Addition, soustraction, multiplication, division, simplification, sous cette forme :

R = A/B + C/D
R = A/B - C/D
R = A/B * C/D
R = A/B / C/D
R = a + B/C
R = a - B/C
R = a * B/C
R = a / B/C
R = a * B/C - d * E/F + G/H * i

tous sont réalisables.

Avec delphi 2009 ou mieux, TFraction fait appel aux opérateur surchargé et se comporte comme n'importe quel type scalaire (integer, byte, etc) l’écriture du code est donc simplifiée.

Source / Exemple : 


function FractionCreate(aNumerateur, aDenominateur: integer): TFraction;

function FractionSimplify(A: TFraction): TFraction;

function FractionToFloat(A: TFraction): Float;

function FractionToStr(A: TFraction): String;
function StrToFraction(A: string): TFraction;

function IntToFraction(A: integer): TFraction;

function FractionAdd(A,B: TFraction): TFraction;
function FractionSubtract(A,B: TFraction): TFraction;
function FractionMultiply(A,B: TFraction): TFraction;
function FractionDivide(A,B: TFraction): TFraction;

Conclusion :


Utilisez la demo 2009 à partir de Delphi 2009, sinon utilisez la démo en mode console avec une version antérieure qui se trouve dans le répertoire DemoD7
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (f0xi)