Black Friday je tu! Využij jedinečnou příležitost a získej až 80 % znalostí navíc zdarma! Více zde
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.
BF extended 2022

Diskuze: Jak zjistit, kolikrat se mi opakuje v poli a jak to zapsat?

Aktivity
Avatar
Ondrej Zadrapa:20.5.2020 11:25

Caute, mam další trable s polem, jak zjistim, kolikrat se konkretni hodnota, minimum, opakuje v poli? Aby mi ve vypisu vyslo, ze zadanych hodnot, třeba 10,2,2,5,6,2 je nejmensi 2 a nachazi se 3x v poli, jak to lze udelat, podle male napovedy v zadani je třeba vytvořit treti smycku, hledal jsem nekde na internetu nejakou srozumitelnou radu, ale přes tu haldu informaci a cizích slov jsem se nedostal k tomu, co hledam, poradil by mi někdo, prosim?

Zkusil jsem:

Sub Main()
        Console.WriteLine("Zadej pocet cisel v rade:")
        Dim pocetCisel As Integer = Integer.Parse(Console.ReadLine())
        Dim poleCisel() As Integer = New Integer(pocetCisel - 1) {}
        For i As Integer = 0 To pocetCisel - 1
            Console.Write("Zadej {0}. cislo: ", i + 1)
            poleCisel(i) = Integer.Parse(Console.ReadLine())
        Next
        Dim minimum = poleCisel(0)
        For i As Integer = 0 To poleCisel.Length - 1
            If poleCisel(i) < minimum Then
                minimum = poleCisel(i)
            End If
        Next
        Dim kolikrat As Integer = 0
        For i As Integer = 0 To poleCisel.Length - 1

        Next
        Console.WriteLine("Nejmensi cislo v poli je {0}.", minimum)
        Console.WriteLine("V poli se nachazi {0}x.", kolikrat)
        Console.ReadKey()
    End Sub

Chci docílit: Aby ve vystupu vypsal hodnotu minima a kolikrat se to minimum v poli vyskytuje.

 
Odpovědět
20.5.2020 11:25
Avatar
Ondrej Zadrapa:20.5.2020 11:58

Dobry, uz jsem na to prisel. :D

 
Nahoru Odpovědět
20.5.2020 11:58
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 2 zpráv z 2.