[?]Come sapere se un numero è pari o dispari

[Cesare Nicola]

Come posso sapere se un numero č pari o dispari, con VB5?
Io ho pensato di fare cosě:

Dim numero as double
Dim risultato as double

risultato = numero Mod 2
if risultato = 0 then
"il numero č pari"
else
"il numero č dispari"
end if

Puň andar bene o c'č qualche qualche funzioncina che fa tutto da sč?

Grazie
Ciao

Cesare Nicola

[Igor]

Oppure se preferisci non usare il MOD:

Dim x as double

if x/2 <> int(x/2) then
"il nomero č dispari"
else
"il numero č pari"

In ogni caso direi che i modi sono equivalenti....
Non penso ci sia una funzione in VB, in quanto č cosě banale risolvere
il problema.

Salutoni.

Igor

-----------------------------------------------------------
"We are such stuff as dream are made on"
William Shakespeare, "The Tempest"
-----------------------------------------------------------
Email: igor.ba...@imola.nettuno.it

[Zeross]

Cesare Nicola <cen...@tin.it> wrote in message
7huupk$66p$1...@nslave1.tin.it...

> Come posso sapere se un numero č pari o dispari, con VB5?
> Io ho pensato di fare cosě:
>
> Dim numero as double
> Dim risultato as double
>
> risultato = numero Mod 2
> if risultato = 0 then
> "il numero č pari"
> else
> "il numero č dispari"
> end if

Questa č piů veloce:

If numero And 1 Then
'il numero č dispari"

else
'il numero č pari

end if

Zeross

[Massimo Luciani]

On Wed, 19 May 1999 19:59:13 GMT, igor.ba...@imola.nettuno.it
(Igor) wrote:

>if x/2 <> int(x/2) then

Be', ma allora fai:

if x/2 <> x\2 then
> "il nomero è dispari"
>else
> "il numero è pari"

Ciao :-)
Massimo

Nell'indirizzo, inserire una "h" tra la "t" e la "u"
In the address, insert an "h" between the "t" and the "u"