banjalukaforum.com
https://banjalukaforum.com/

Programiranje uopste!!!!!
https://banjalukaforum.com/viewtopic.php?f=18&t=2498
Stranica 1 od 3

Autoru:  ~YURI~ [ 28 Avg 2002, 01:29 ]
Tema posta:  Programiranje uopste!!!!!

Ovako momci kao sto je vec jedan od vas reko ovaj forum je zamro!!!!
Ja mislim da bi ovde trebali iznositi svoje ideje , kodove i sve ostalo i podjeliti sa drugima!!!!
Naravno i pomoci nekome u vezi odredjenog pitanja , jes da nas je malo
zainteresovanih za ovu temu , ali nas par mozemo da ozivimo ovu temu!!

Toliko od mene!!!

Autoru:  keerg [ 29 Avg 2002, 00:29 ]
Tema posta: 

Pa hajde zivni .. ne znam sta cekas .. :]

Autoru:  misk0 [ 29 Avg 2002, 08:08 ]
Tema posta: 

Evo mene recimo interesuje kako linkovati dvije baze
Oracle i MSSQL, odnosno kako iz ORACLE baze omoguciti
pregled i popunjavanje MSSQL tabela, pokretanje trigera
slicno.
naravno interesuje me prakticno a ne u domenu teorije, trebalo
bi ovako ili onako .

znaci kod koji povezuje baze ..

Autoru:  ~YURI~ [ 29 Avg 2002, 16:33 ]
Tema posta: 

Sorry , al ja ti u ovome ne mogu pomoci!!!
Zna li iko odgovor na ovo?

Autoru:  Vertygo [ 05 Sep 2002, 01:52 ]
Tema posta:  .

hmmmzz ovo mi je dalo ideju ajde neko da zadaje programe koji bi se trebali uraditi a onda ih mi pokusavamo napraviti naravno programi ne trebaju da budu pretjerano teski jer ja mislim da ovaj forum ne posjecuje bas puno ljudi sa velikim znanjem o programiranju.
npr napraviti program koji ce sva unesena mala slova pretvoriti u velika, naravno ovo je samo primjer koji i nije tesko izraditi. Napravljeni program jednostavno uplodujete na net sa source codom i na kraju glasamo ko je najbolje uradio. Programski jezik po izboru C++, VB, Delphi . . .
Ovo je samo ideja :) !!

Autoru:  misk0 [ 05 Sep 2002, 12:34 ]
Tema posta: 

Ideja nije losha samo bi se to svelo na rijesavanje konkretnih zadataka
A vidim puno zainteresovanih bez problema ?
Zar je to moguce?
svi programiraju i niko nema problema ?

pisite o realnim problemima

Autoru:  ~YURI~ [ 07 Sep 2002, 16:25 ]
Tema posta: 

verti dobra ideja (za promenu) eto recmo za pocetak da uradimo program
kad ukucas neki trocifren broj u textbox
da on isipise svaku cifru pojedinacno
nije bitno u kom se jeziku radi, samo da pogram funcjonise
eto to vam je zadaca
ako ima neko jos zadatak nek salje

Autoru:  misk0 [ 07 Sep 2002, 16:45 ]
Tema posta: 

hm .
to se radi u uvodima knjige.
Evo vam konrektniji zadatak :
Izracunati 2^n za n = 500 i napisati koliko cifara ima .
Da vam napomenem da ne mozete napraviti petlju jer
trebate dobiti tacan broj a ne zaokruzen

Autoru:  ~YURI~ [ 08 Sep 2002, 13:19 ]
Tema posta: 

misko, prvo resi jedan zadatak
pa onda zadaj drugi ja mislim da je najpametnije!!!!

Autoru:  Vertygo [ 08 Sep 2002, 13:49 ]
Tema posta:  .

2^500 lol !!! to ni long int nece moci pomoci hehehe
ajde pogledacu sutra sta se moze uraditi

Autoru:  Not now, John! [ 10 Sep 2002, 18:54 ]
Tema posta: 

Kod:
Dim iCount As Integer
Dim iPrenos As Integer
Dim sDvaNaPetsto As String
Dim sDvaNaPetstoInv As String
Dim i As Integer
Dim sTMP As String
Dim iTMP As Integer
iCount = 1
sDvaNaPetstoInv = "2"
opet:
For i = 1 To Len(sDvaNaPetstoInv)
    iTMP = 2 * Val(Mid(sDvaNaPetstoInv, i, 1)) + iPrenos
    iPrenos = 0
    sTMP = sTMP & (iTMP Mod 10)
    If iTMP > 9 Then iPrenos = 1
Next
If iPrenos = 1 Then sTMP = sTMP & "1"
iPrenos = 0
sDvaNaPetstoInv = sTMP
sTMP = ""
iCount = iCount + 1
If iCount < 500 Then GoTo opet

For i = Len(sDvaNaPetstoInv) To 1 Step -1
    sDvaNaPetsto = sDvaNaPetsto & Mid(sDvaNaPetstoInv, i, 1)
Next

Debug.Print sDvaNaPetsto


2^500=3273390607896141870013189696827599152216642046043064789483291368096133796404674554883270092325904157150886684127560071009217256545885393053328527589376

Provjereno.

Autoru:  ~YURI~ [ 10 Sep 2002, 22:31 ]
Tema posta: 

izgleda da je coek resio problem:)))
misko kak mislis nema petlje, koje petlje??
jel ko uradio moj zadatak:)

Autoru:  ~YURI~ [ 10 Sep 2002, 22:34 ]
Tema posta: 

momci samo ima jedna stvar il bar mi se cini
provericu...
cini mi se da taj program gore ispisuje rezultat a ne broj cifara

Autoru:  Vertygo [ 11 Sep 2002, 01:38 ]
Tema posta:  .

Program uradjen u VB ali ako ocemo izracunati koliko cifri ima taj broj treba jos samo dodati:

Citiraj:

Dim s As Integer
......
While sDvaNaPetsto > 1
sDvaNaPetsto = sDvaNaPetsto / 10
s = s + 1
Wend
Debug.Print s

151 cifra ...
ne znam sta ili zasto je misko pominja da ne smijemo koristiti petlju ali je john ipak to pravilo prekrsio ;))

Autoru:  Not now, John! [ 11 Sep 2002, 09:01 ]
Tema posta: 

Za računanje dužine može i
Kod:
Len(sDvaNaPetsto)
jer je sDvaNaPetsto svakako string.

Kad smo kod tih "2 na nešto" možete probati da izračunate koliko je puta potrebno presaviti list papira da bi se dobila debljina kao od Zemlje do Mjeseca.
Rezultat je više nego zanimljiv: dobija se oko 50-tak puta.

Takođe, za sve one koji tvrde da su čisti Srbi ili čisti Hrvati možete izračunati koliko svaki čovjek ima predaka u posljednjih 800 godina. Dođe se do cifre od preko 2000 milijardi, a to je više ljudi nego što je ikad živjelo na planeti.

Pozdrav!

Autoru:  ~YURI~ [ 11 Sep 2002, 09:44 ]
Tema posta: 

heheh znaosam da nesto ne valja:)
John, da nije to malo nelogicno???
to sa papirom i precima:)))

Autoru:  Not now, John! [ 11 Sep 2002, 20:30 ]
Tema posta: 

Zvuči nelogično, ali računica ne laže.
Ako uzmeš da je udaljenost Mjeseca od Zemlje 384 400 000 metara, a srednja udaljenost Sunca od Zemlje 150 000 000 000 metara i ako pretpostaviš da je debljina lista papira 0.0001 metar (debljina paketa za štampač (oko 5.5 cm) podijeljena sa brojem 500 koliko listova ima u paketu) dolazi se do sljedećeg:
Da bi debljina presavijenog papira bila veća od distance Zemlja-Mjesec potrebno ga je presaviti 42 puta (2^42*10^(-4)=439 804 651).
Da bi debljina presavijenog papira bila veća od distance Zemlja-Sunce potrebno ga je presaviti 51 put.

Sjetio sam se još jedne zanimljive "eksponencijalne" priče:
Neki vladar, da nagradi podanika, ponudi mu da kaže šta želi. Ovaj, pošto je bio dobar šahista, zatraži da mu vladar dâ onoliko zrna žita koliko stane na šahovsku tablu, ali tako da se na prvo polje stavi jedno zrno i na svako sljedeće dvostruko više nego na prethodno polje. Vladar obeća da će ispuniti želju i začudi se podanikovoj skromnosti.

Vi izračunajte koliko tona teži 18446744073709551615 zrna žita.
Pozdrav!

Autoru:  ~YURI~ [ 11 Sep 2002, 22:03 ]
Tema posta: 

znas sta, sad si me tek zbunio

jel iko konta ovo posto stvarno totalno nelogicno
al ajd... jel iko radio program ovaj gore u nekom drugom jeziku sem u vb

Autoru:  misk0 [ 13 Sep 2002, 14:58 ]
Tema posta: 

Kad sam rekao petlju mislio sam ono obicno mnozenje nekog niza
u smislu
Kod:
   n:=2;
   for i:=1 to 500
      n=n*2


To sam rijesio prije par godina u pascalu na nekom od takmicenja, ne sjecam se tacno ..
Takodje se ne sjecam je'l bilo bas 2^500 jer je tadasnji zadatak imao oko 1300 cifara kao rijesenje.

Autoru:  misk0 [ 13 Sep 2002, 15:04 ]
Tema posta: 

Not now, John! je napisao:
koliko je puta potrebno presaviti list papira da bi se dobila debljina kao od Zemlje do Mjeseca.
Rezultat je više nego zanimljiv: dobija se oko 50-tak puta.


Interesantno.. mozda grijesim
ali izvedi jedan experiment..
Uzmi list papira i probaj ga presavijati
onda uzmi veci ili manji list papira i njega probaj presavijati

presavices ga maxilamalno 7 puta !! :)

Stranica 1 od 3 Sva vremena su u UTC [ DST ]
Powered by phpBB® Forum Software © phpBB Group
http://www.phpbb.com/