Il existe une fonction dans de nombreux langages, comme le Pascal, permettant de déterminer si un nombre est impaire ou paire. Voici un programme très performant permettant de déterminer celui-ci en Pascal:
- Program OddSamples;
-
- Function Odd(value:Integer):Boolean;Begin
- Odd := value and 1 = 1;
- End;
-
- Var
- I:Integer;
- BEGIN
- For I := -4 To 10 do Begin
- Write('Le nombre ',I,' est ');
- If Odd(I)Then WriteLn('Impaire')
- Else WriteLn('Pair');
- End;
- END.
on obtiendra le résultat suivant:
Le nombre -4 est PairLe nombre -3 est Impaire
Le nombre -2 est Pair
Le nombre -1 est Impaire
Le nombre 0 est Pair
Le nombre 1 est Impaire
Le nombre 2 est Pair
Le nombre 3 est Impaire
Le nombre 4 est Pair
Le nombre 5 est Impaire
Le nombre 6 est Pair
Le nombre 7 est Impaire
Le nombre 8 est Pair
Le nombre 9 est Impaire
Le nombre 10 est Pair
Voir également
Dernière mise à jour : Mardi, le 25 octobre 2016