Hjælp til speciel afrunding

Den meget primitive maade er:

tal1 = (tal / 10) * 10 + afrunding;
tal2 = tal1 - 10;
tal3 = tal1 + 10;

og saa finde dte mindste af tal1, tal2 og tal3.

Men der boer vaere en smartere maade at goere det paa.

Gætter på at du ikke skal håndtere negative tal. Hvis tallet der skal afrundes hedder x og afrundingsfaktoren hedder a:

public int afrund(int x, int a)
{
    if (x < a) { return a; }

    return ((x-a) / 10) * 10 + a
}

Ok, svar #2 er ikke rigtigt. Ved at heltalsdividere med 10 og gange med 10, runder man jo altid ned. Der skal bruges "almindelig afrunding" for at det virker

public int afrund(int x, int a)
{
    if (x < a) { return a; }

    return Math.Round((x-a) / 10) * 10 + a
}

Hej - og tak for indlæggene.

@Arne, jeg har prøvet at køre din løsning gennem en funktion,
og hvis jeg kører dem gennem mine fire eksempler får jeg resultaterne af tal1, tal2, tal3:

- Hvis jeg har 112 og min afrundingsfaktor er 9:
121, 111, 131

- Hvis jeg har 247 og min afrundingsfaktor er 0:
247, 237, 257

- Hvis jeg har 146 og min afrundingsfaktor er 8:
154, 144, 164

- Hvis jeg har 131 og min afrundingsfaktor er 7:
138, 128, 148

Den er på vej, men jeg kan ikke helt se hvor den går galt.



@alphabits, jeg prøver at konvertere dit sidste forslag til noget VB'sk, men mit resultat bliver altid det samme som grundtallet hvis jeg bruger:

Public Function afrund(x As Integer, a As Integer) As Integer
        If (x < a) Then
            Return a
        Else
            Return Math.Round((x-a) / 10) * 10 + a
        End If
End Function

- Men jeg er ikke sikker på om den er korrekt oversat?? 

Mvh.

Jeg har aldrig programmeret i VB, men umiddelbart ser det ud til at du har oversat det korrekt. Men måske kalder du funktionen med forkerte parametrer. Prøv at give nogle eksempler på hvordan du kalder funktionen. Til gengæld har jeg fundet en lille fejl i min kode, så du får lige en opdateret version.

public int afrund(int x, int a)
{
    if (x < a) { return a; }
    double rounded = Math.Round((x-a) / 10.0) * 10;
    return (int)(rounded + a);
}

Hvis jeg f.eks. kalder afrund(120, 8) får jeg 118. Hvis jeg kalder afrund(120, 4) får jeg 124 osv.

#5 Den virker i hvert fald også ved mig :-)

I VB proev med \ fremfor /

Hej, efter jeg skiftede til forslaget i #5 virker det også helt som det skal her!

Takker for hjælpen, smider du et svar alphabits?

Svar :)