Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Round to nearest 5
Message
De
25/01/2005 07:49:17
 
 
À
25/01/2005 07:40:03
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00980330
Message ID:
00980335
Vues:
38
Hi Terry. Yeah, I have something like this but I think it's a kludge and am hoping that someone has a one (or two) liner :)



>Jos, haven't tested this but something like:
>
>
>* to find the NEXT higher number to meet the criteria
>FUNCTION Blah
>LPARAM   tnNum
>
>lnNum = tnNum
>
>If MOD( lnNum, 5) <> 0
>    Do while not llFound
>      lnNum = lnNum + 1
>      If CEILING( MOD( lnNum, 5) = 0
>          llFound = .T.
>      Endif
>    EndDO
>endif
>Return lnNum
>
>
>HTH but Sergey will probably come up with a one-liner later! :-)
>
>Terry
>
>>Hi All,
>>
>>Having a bit of a brain freeze here...I have an integer between 0 and 100. I want to round it to the nearest integer wholly divisible by 5 i.e. 0,5,10,15,...95,100
>>
>>Sorry for the low quality challenge :)
In the End, we will remember not the words of our enemies, but the silence of our friends - Martin Luther King, Jr.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform