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 LotusScript:

Function Odd(Byval value As Integer) As Integer      Odd= (value And 1) = 1 End Function Sub Main()      Dim i As Integer      For i = -4 To 10           Print "Le nombre " &Str$(i) &" est ";           If Odd(i) Then                Print "Impaire"           Else                Print "Pair"           End If      Next End Sub

on obtiendra le résultat suivant:

Le nombre -4 est Pair Le 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