Så vidt jeg vet er det ingen "formel" for å finne kuben av et tall, så her er en god gjetning algorythm.Pass tallet i "Number", etterfulgt av "Beste gjetning" .br beste antar kan være alt (Number div 2) hvis du ikke har noen idea.function CubedRoot (Nummer: Integer; BestGuess: Fast): Fast; Var G, LastGuess: Fast, begynner LastGuess: = 0; G: = BestGuess; while (G * G * G < > Number) og (LastGuess < > G) gjør begynne LastGuess: = G; G: = (2/3) * G + (1/3) * (nummer /(G * G)); slutt; CubedRoot: = G; end;