Forum WSKiZ Strona Główna

 WSKiZ
Forum studentów wskiz -> Informatyka [rekrutacja wiosenna 2006]
 

Losowe + tablica [console]

 
Napisz nowy temat   Odpowiedz do tematu    Forum WSKiZ Strona Główna -> programowanie
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
hanziri
Administrator



Dołączył: 05 Kwi 2006
Posty: 126
Przeczytał: 0 tematów

Skąd: Kalisz
PostWysłany: Sob 17:58, 01 Lip 2006    Temat postu: Losowe + tablica [console]

Kod:

Module Module1

    Sub Main()
        Dim i As Byte
        Dim suma, sred As Integer

        Dim tabl(9)
        Console.WriteLine("TABLICA: ")
        Console.WriteLine(" ")
        Randomize()
        For i = 0 To 9

            tabl(i) = Int(40 * Rnd() + 30)
            Console.Write(tabl(i) & "  ")
            suma += tabl(i)
        Next i
        sred = suma / 10
        Console.WriteLine(" ")
        Console.WriteLine("----------------------------------------------------")
        Console.WriteLine(" ")
        Console.WriteLine("srednia: " & sred)
        Console.WriteLine(" ")
        Console.WriteLine("suma: " & suma)
        Console.ReadLine()

    End Sub

End Module
Powrót do góry
Zobacz profil autora
Girus
Gość
PostWysłany: Śro 5:36, 12 Lip 2006    Temat postu:
Question Question A jak się wczytuje dane rnd do tablicy dwu-wymiarowej Question Question
Troszkę mnie to przerosło wczoraj HELP Embarassed
Powrót do góry
baldhorse




Dołączył: 13 Cze 2006
Posty: 59
Przeczytał: 0 tematów

Skąd: Poznań
PostWysłany: Śro 15:37, 12 Lip 2006    Temat postu:
Żeby wczytać dane do tablicy dwuwymiarowej, musisz skorzystać z dwóch pętli, mniej więcej tak mogłoby to wyglądać (piszę z głowy, bo nie mam tu vb):
[code]
Dim tab(9,4) As Integer
Dim q, w As Integer

Randomize()
For q = 0 To tab.GetUpperBound(0)
For w = 0 To tab.GetUpperBound(1)
tab(q,w) = Rnd() * 50 + 10
Next
Next
[/code]

No, myślę, że coś takiego powinno zadziałać, GetUpperBound(Z) to nic innego jak pobranie najwyższego indeksu wiersza w kolumnie o indeksie Z, coś podobnego podawał Bartoszek na wykładzie, u niego było to UBound, ale ja z tego nie korzystam.
Powrót do góry
Zobacz profil autora
Wyświetl posty z ostatnich:   
Napisz nowy temat   Odpowiedz do tematu    Forum WSKiZ Strona Główna -> programowanie Wszystkie czasy w strefie CET (Europa)
Strona 1 z 1

 
Skocz do:  
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach


fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2005 phpBB Group
deoxGreen v1.2 // Theme created by Sopel stylerbb.net & programosy.pl

Regulamin
Na skróty:infoSemestr VSemestr IVSemestr IIISemestr IISemestr Imateriałyterminy/wynikiterminyofftopofftopprogramowaniećwiczenia/laborkiwykładymateriałymateriałyćwiczenia/laborkiofftopmateriałyofftopmateriaływykładyćwiczenia/laborkiwykładyofftopwykładygryprogramowaniećwiczenia/laborkirejestracja