Post Reply 
 
Thread Rating:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Problemi s matricama
Author Message
Kerber Offline
_
*

Posts: 357
Joined: Dec 2006
Reputation: 1
Post: #1
Problemi s matricama
Ukoliko imate problema sa matricama i objavljenim tutorijalom. Napišite ono što ne razumijete ili ono što nije dobro pa da ispravimo Namigivanje

FGD!

Pravila foruma - pročitajte prije nego pitate
15-02-2007 12:22 AM
Visit this user's website Find all posts by this user Quote this message in a reply
bXs Offline
Novi korisnik
*

Posts: 25
Joined: Jan 2007
Reputation: 0
Post: #2
RE: Problemi s matricama
da, ali bilo bi fino da prvo kazes sta su matrice He he...

mozda neko oce da radi nesto, a ne zna da se tu koriste matrice, a onda ne zna to ni uraditi preko matrica :)
22-02-2007 08:32 PM
Find all posts by this user Quote this message in a reply
Kerber Offline
_
*

Posts: 357
Joined: Dec 2006
Reputation: 1
Post: #3
RE: Problemi s matricama
Nisi razumio ovu temu, ona je kreirana u sklopu zadnjeg tutora koji se odnosi na matrice. Pa kome nije jasan tutor ili neki dio neka piše ovdje da ne luta Namigivanje

FGD!

Pravila foruma - pročitajte prije nego pitate
22-02-2007 09:44 PM
Visit this user's website Find all posts by this user Quote this message in a reply
ByPass Offline
Novi korisnik
*

Posts: 2
Joined: Oct 2007
Reputation: 0
Post: #4
RE: Problemi s matricama
imam jedan problem......

Private Sub Command2_Click()
List2.Clear

Dim index As Integer
Dim indexS As Integer

indexS = CInt(txtSacuvani - 1)

ReDim sacuvani(indexS)

For indexS = LBound(sacuvani) To UBound(sacuvani)
sacuvani(indexS) = InputBox("Unesite broj kojeg zelite sacuvati ")
Next indexS

For index = LBound(brojevi) To UBound(brojevi)
For indexS = LBound(sacuvani) To UBound(sacuvani)
If brojevi(index) = sacuvani(indexS) Then
GoTo xxx:
Else
brojevi(index) = Rand(0, 0) EVO ODE MI PROMINI SVE BROJEVE U MATRICI A TRIBA MI DA MI PROMINI SAMO JEDAN !!!!
End If
Next indexS
xxx:
List2.AddItem brojevi(index)
Next index

End Sub
04-10-2007 04:38 PM
Find all posts by this user Quote this message in a reply
ByPass Offline
Novi korisnik
*

Posts: 2
Joined: Oct 2007
Reputation: 0
Post: #5
RE: Problemi s matricama
nasa san rijesenje ....malo san mozda i skuzija ;)heh a tribalo je malo sist eh eh---hvala svejedno Namigivanje

Code:
Private Sub cmdCuvanje_Click()
    Form1.List1.Clear
    Dim index As Integer
    Dim indexS As Integer
    Dim dummy As Integer
    Dim brojNaden As Boolean

    dummy = (brojClanovaMatrice(brojevi)) - 1
    
    ReDim sacuvani(txtSacuvani - 1)
    
        For indexS = LBound(sacuvani) To UBound(sacuvani)
            sacuvani(indexS) = InputBox("Unesite broj kojeg zelite sacuvati ")
        Next indexS
        
    
        For index = LBound(brojevi) To UBound(brojevi)
            brojNaden = False
            
                For indexS = LBound(sacuvani) To UBound(sacuvani)
                    If sacuvani(indexS) = brojevi(index) Then
                        MsgBox "nasao sam broj i sacuvat cu ga"
                        brojNaden = True
                    End If
                  
                    If (brojNaden = False) And (indexS = UBound(sacuvani)) Then
                        brojevi(index) = Rand(0, 100)
                    End If

                Next indexS
            Form1.List1.AddItem brojevi(index)
        Next index
    
frmRedimenzioniranje.Hide
End Sub
05-10-2007 12:35 AM
Find all posts by this user Quote this message in a reply
zbunjola Offline
Novi korisnik
*

Posts: 1
Joined: Jan 2010
Reputation: 0
Post: #6
RE: Problemi s matricama
Pitanje editovano... Jel' bas bilo potrebno da stavis vise smajlija nego slova u jednom postu?

heeeej!

trebam pomoć..ukoliko je moguće sto prije..:((

Učitati matricu A(4,5). Zbrojiti sve neparne retke matrice i rezultat smjestiti u jednodimenzionalno polje (niz). Confused

zadatak trebam rješiti u dev.pas-u...

hvala!!!
16-01-2010 04:56 PM
Find all posts by this user Quote this message in a reply
Post Reply 


Forum Jump:


User(s) browsing this thread: 1 Guest(s)