Prethodna tema :: Sljedeća tema |
Autor/ica |
Poruka |
Saf Forumski umjetnik
Pridružen/a: 10. 06. 2005. (21:55:28) Postovi: (1B0)16
Spol:
Lokacija: Zagreb
|
|
[Vrh] |
|
Smith Forumaš(ica)
Pridružen/a: 30. 10. 2004. (23:30:23) Postovi: (178)16
Spol:
Lokacija: {Tamo Gore}^{TM}
|
Postano: 17:46 pon, 22. 8. 2005 Naslov: |
|
|
Neka je [i]br[/i] integer.
Svaki put kad dobijes novu znamenku ([i]zn[/i] tipa integer), pomnozi [i]br[/i] s 10 i dodaj mu tu znamenku da bi konstruirao trazeni broj.
Dakle,
[code:1]br:=br*10+zn;[/code:1]
Samo pripazi kod zadnje (tj. prve) znamenke, nju ne treba dodavati (moze se i elegantnije, ali mozak mi je fiksiran na linearnu).
Naravno, pocetna vrijednost od [i]br[/i] je 1, a od [i]zn[/i] nebitna.
Ako treba elaborirati, vristi.
Neka je br integer.
Svaki put kad dobijes novu znamenku (zn tipa integer), pomnozi br s 10 i dodaj mu tu znamenku da bi konstruirao trazeni broj.
Dakle,
Samo pripazi kod zadnje (tj. prve) znamenke, nju ne treba dodavati (moze se i elegantnije, ali mozak mi je fiksiran na linearnu).
Naravno, pocetna vrijednost od br je 1, a od zn nebitna.
Ako treba elaborirati, vristi.
_________________ We only have one candle
To burn down to the handle...
- Sonata Arctica, Weballergy
|
|
[Vrh] |
|
vsego Site Admin
Pridružen/a: 06. 10. 2002. (22:07:09) Postovi: (3560)16
Spol:
Lokacija: /sbin/init
|
Postano: 5:01 uto, 23. 8. 2005 Naslov: |
|
|
Nece li ovo zapamtiti broj "u rikverc"? :-k (sad sam dosao s puta, pa mozda grijesim :|)
Takodjer, ovo jako ogranicava, jer u [tt]integer[/tt] (dapace, [tt]longint[/tt]) stanu brojevi do 2^31-1 sto je priblizno 2*10^9. :-s Dakle, do 10 znamenaka, sto znaci da bi ovako mogao zapamtiti do 10 binarnih znamenaka; dakle gornja ograda takvog programa bi bila 2^11-1=2047. :shock: :(
Predlazem pamcenje u stringu:
[code:1]s := IntToStr(zn) + s;[/code:1]
Ovako, limit je 255 znakova, tj. binarnih znamenaka, sto znaci da mozes pamtiti do 2^256-1 sto daleko premasuje ulaz koji bi takav program imao (vjerojatno [tt]longint[/tt]). :D
Nece li ovo zapamtiti broj "u rikverc"? (sad sam dosao s puta, pa mozda grijesim )
Takodjer, ovo jako ogranicava, jer u integer (dapace, longint) stanu brojevi do 2^31-1 sto je priblizno 2*10^9. Dakle, do 10 znamenaka, sto znaci da bi ovako mogao zapamtiti do 10 binarnih znamenaka; dakle gornja ograda takvog programa bi bila 2^11-1=2047.
Predlazem pamcenje u stringu:
Kod: | s := IntToStr(zn) + s; |
Ovako, limit je 255 znakova, tj. binarnih znamenaka, sto znaci da mozes pamtiti do 2^256-1 sto daleko premasuje ulaz koji bi takav program imao (vjerojatno longint).
_________________ U pravilu ignoriram pitanja u krivim topicima i kodove koji nisu u [code]...[/code] blokovima.
Takodjer, OBJASNITE sto vas muci! "Sto mi je krivo?", bez opisa u cemu je problem, rijetko ce zadobiti moju paznju.
|
|
[Vrh] |
|
krcko Forumaš nagrađen za životno djelo
Pridružen/a: 07. 10. 2002. (15:57:59) Postovi: (18B3)16
|
|
[Vrh] |
|
steelworker Site Admin
Pridružen/a: 25. 04. 2003. (11:21:04) Postovi: (698)16
Lokacija: 4-dimensional space-time continuum. Or some 11-dimensional continuum? Dunna, it's all relative.
|
Postano: 14:55 uto, 23. 8. 2005 Naslov: |
|
|
[color=darkred]Maknuh ovaj topic u Cistiliste. Smislenije je da je tu, nego kod studentskih predstavnika.[/color]
...
Nego, Pascal.. Ja ti ponavljam kaj ti je vsego rekel. Primjeti da kad to radis sa stringovima onda konkateniras svaku znamenku na dosad vec pretvoreno, a to vrlo jednostavno rijesava problem sto broj izracunavas naopacke napisan, jer konkatenaciju mozes raditi i s "lijeve" i "desne" strane..
:D
Maknuh ovaj topic u Cistiliste. Smislenije je da je tu, nego kod studentskih predstavnika.
...
Nego, Pascal.. Ja ti ponavljam kaj ti je vsego rekel. Primjeti da kad to radis sa stringovima onda konkateniras svaku znamenku na dosad vec pretvoreno, a to vrlo jednostavno rijesava problem sto broj izracunavas naopacke napisan, jer konkatenaciju mozes raditi i s "lijeve" i "desne" strane..
_________________ I live like this 'cause I like it
And I've seen too much to pretend
You can't ignore the beauty in the things that you love
Like you can't stand the hatred and the lies
Zadnja promjena: steelworker; 15:43 ned, 28. 8. 2005; ukupno mijenjano 1 put.
|
|
[Vrh] |
|
Smith Forumaš(ica)
Pridružen/a: 30. 10. 2004. (23:30:23) Postovi: (178)16
Spol:
Lokacija: {Tamo Gore}^{TM}
|
|
[Vrh] |
|
krcko Forumaš nagrađen za životno djelo
Pridružen/a: 07. 10. 2002. (15:57:59) Postovi: (18B3)16
|
|
[Vrh] |
|
Grof Forumaš(ica)
Pridružen/a: 26. 11. 2002. (17:15:33) Postovi: (44)16
|
|
[Vrh] |
|
steelworker Site Admin
Pridružen/a: 25. 04. 2003. (11:21:04) Postovi: (698)16
Lokacija: 4-dimensional space-time continuum. Or some 11-dimensional continuum? Dunna, it's all relative.
|
|
[Vrh] |
|
|