Matematik - tal skal gå op i 5

Ps. det skal bruges i et Visual Basic 6 program, så hvis dét giver nogle lettere muligheder, skal i være velkommen til at benytte det.

Hvis dine tal skal være mellem 10 og 1800, så lav tilfældige tal mellem 2 og 360, og gang dem så med 5.

tallene er ikke desværre helt tilfældige, de indtastes af brugeren - men jeg kan ikke vide hvorimellem 170 og 1800 tallet ligger.

I Excel:

Tallet står i feltet A1
=MAFRUND(A1;5)

Returnerer et tal afrundet til det ønskede multiplum.

Hvis denne funktion ikke er tilgængelig, skal du køre installationsprogrammet for at installere Analysis ToolPak. Når Analysis ToolPak er installeret, skal du aktivere programmet ved hjælp af kommandoen Tilføjelsesprogrammer i menuen Funktioner.

jeg har desværre ikke excel :-(

Ok, så. Jeg har ikke adgang til VB6, men gammeldags ASP er vistnok li'så godt på dette punkt. Her er en lille stump:

  for i=1000 to 1100
    j = cint(i/5)*5
    response.write i & "->" & j & "<br>"
  next

som udskriver

1000->1000
1001->1000
1002->1000
1003->1005
1004->1005
1005->1005
1006->1005
1007->1005
1008->1010
1009->1010
1010->1010
1011->1010
1012->1010
1013->1015
...

Er det sådan ca. hvad du skal have?

jep præcist!
-hvis du smidder et svar, så lukker jeg her :-)

Jeg samler slet ikke på point, tak. Du skal formentlig svare selv, og acceptere eget svar.

hehe fair nok :-)

Ved godt spørgsmålet er afsluttet, Men hvorfor ikke benytte:

result = mitTal - (mitTal mod 5)

Ved godt at erikjacobsen's metode virker - er bare nysgerrig hvorfor man ikke valgte at løse problemet med rest-division.

jeg vil tro det er fordi jeg ikke kendte den funktion :-)

Det giver ikke det samme resultat. Min metode får "af(op)rundet" til det nærmeste tal, hvor 5 går op.
Din metode vil fx for 1004 giv 1000 i stedet for mit 1005.

Hvilken metode, der så skal bruges, ved jeg så ikke.

I det tilfælde var erikjacobsen's metode nok den bedste, eftersom jeg er interesseret i det tal der er tættest på det input jeg får af brugeren.

-men jeg kan godt se at den anden metode kunne være brugbar i mange tilfælde, som fx til at se om et tal er lige eller ej...( if (mitTal mod 2) = 0 then "taller er lige") - nice :-)

*argh* der mangler en "rediger indlæg" funktion her - så man kan rette stavefejl :-)
-mente naturligvis "Tallet er lige".