Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi zahl aufspalten (https://www.delphipraxis.net/143996-zahl-aufspalten.html)

rob60 27. Nov 2009 15:23


zahl aufspalten
 
hi

ich hab mal wieder ein problemchen:

ich habe einen kleinen primzahlenrechner gebastelt der funktioniert auch gut bloss wird int64 irgendwann zu klein

kennt jemand einen grösseren dateitypen?
oder einen algorytmus um die zahl aufzuspalten und dann die teilbarkeit prüfen

zb geht 1234312344 /2 = geht 4 durch 2

patti 27. Nov 2009 15:28

Re: zahl aufspalten
 
Wenn du bloß die 1er-Stelle haben willst, dann probiere mal "Zahl mod 10". Zumindest bei Zahl/2 hilft dir das ja schonmal weiter.

Edit: Ansonsten könnte das hier für dich interessant sein: StringMatheLib aus der DP

Mithrandir 27. Nov 2009 15:38

Re: zahl aufspalten
 
Zitat:

Zitat von rob60
kennt jemand einen grösseren dateitypen?

Selber implementieren... :dance:

rob60 27. Nov 2009 17:29

Re: zahl aufspalten
 
danke die Links sind super
zu den einerstellen bei durch 2 geht das schon aber bei geteilt durch 29 wirds schwieriger ich dachte da an
sowas wie zahl als string einlesen erste 4 stellen nehmen durch 29 teilen + wieder 4 stellen durch 20 teilen usw.
kann aber nicht funzen aber mit den links werd ich schon was finden

himitsu 28. Nov 2009 10:37

Re: zahl aufspalten
 
Du solltest aber Eines bedenken: meine StringMatheLib ist nicht unbedingt die Schnellste, obwohl sie an einigen Stellen schon optimiert wurde.
Aber insgesamt ist sie "nur" einfach (unoptimiert) gehalten, was natürlich auch an dem Speichermedium (Stringoperationen) liegt.

Wenn du also an die Geschindigkeitsgrenzen gerätst, dann solltest du eine andere Lib verwenden.

Da gibt es z.B. TBigInt und Ähnliches existiert auch in der DP und dann gibt es natürlich noch das DEC (Part II oder III aka DECMath)


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz