UDF for finding if a number is even or odd...

Post new topic   Reply to topic

View previous topic View next topic Go down

UDF for finding if a number is even or odd...

Post  Draygoes on Thu Oct 29, 2009 2:27 am

This is probably simple, but I just cannot find the answer.
Can you guys help me write a UDF for finding if a number, no matter what size, is even or odd?

Thanks in advance!


EDIT
Example:
Code:

sNumber = 12345678910
$result = is_even_or_odd($sNumber)
MsgBox( 0, "Result", "The number " & sNumber & " is " & $result & ".")


I would like the output to be "even" or "odd".

Draygoes

Posts: 2
Join date: 2009-10-24
Age: 20
Location: Garland, Texas, United States

View user profile

Back to top Go down

Re: UDF for finding if a number is even or odd...

Post  P5ych0Gigabyte on Thu Oct 29, 2009 3:09 pm

Code:
$sNumber = 5
$result = is_even_or_odd($sNumber)
MsgBox(0, "Result", "The number " & $sNumber & " is " & $result & ".")



Func is_even_or_odd($N)
   If IsInt($N / 2) Then Return "even"
   Return "odd"
EndFunc  ;==>is_even_or_odd

P5ych0Gigabyte
Admin

Posts: 27
Join date: 2009-10-21
Location: New Jersey,USA

View user profile http://www.c4free.info

Back to top Go down

A better way

Post  NerdFencer on Mon Feb 15, 2010 8:53 pm

Here is a slightly faster way to do it... not that efficiency means too much with a function like this...

Code:
$sNumber = 5
$result = is_even_or_odd($sNumber)
MsgBox(0, "Result", "The number " & $sNumber & " is " & $result & ".")

Func is_even_or_odd($N)
   If Mod($N,2) Then Return "odd"
   Return "even"
EndFunc

NerdFencer

Posts: 1
Join date: 2010-02-16

View user profile

Back to top Go down

View previous topic View next topic Back to top


Post new topic   Reply to topic
Permissions of this forum:
You cannot reply to topics in this forum