Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

[Pascal] Losowanie drużyny

Unrak 15 Wrz 2011 23:45 1918 6
  • #1 15 Wrz 2011 23:45
    Unrak
    Poziom 8  

    Witam.

    Mam taki problem iż chcę napisać program losujący drużyny.
    np.
    Podaję ilość drużyn, np. 4 oraz ilość graczy, np. 17.
    Do tablicy wpisuję wszystkich graczy i za pomocą funkcji randomize przypisuje każdemu z graczy jedną liczbę. I tu właśnie mam problem i stąd moje pytanie. Jak zabezpieczyć program przed wylosowaniem drugiej takiej samej liczby?
    Pierwsza liczba 4 - przypisuje nick1
    Druga liczba 8 - przypisuje nick2
    itd.
    Powtarza się liczba 8 to losuje dalej.
    Itd. aż skończą się wszystkie liczby.
    Mam nadzieje że zrozumiałe.

    Z góry dziękuje za pomoc i pozdrawiam.
    Morf ^^

    0 6
  • #2 16 Wrz 2011 00:02
    KubeqZ
    Poziom 16  

    Jeśli dobrze zrozumiałem, musisz za każdym (poza pierwszym) losowaniem liczby sprawdzać czy nie znajduje się już w tablicy, i w zależności od wyniku tego sprawdzenia powtarzać losowanie lub nie.

    0
  • #3 16 Wrz 2011 07:01
    Unrak
    Poziom 8  

    Ale jak to sprawdzić? :(
    Wylosowane liczba jest to nr komórki tablicy.

    Mam sobie taką tablice:
    [1][2][3][4][5]
    1: nr1
    2: nr2
    3: nr3
    4: nr4
    5: nr5

    Losuję teraz liczby i przypisuje
    tą pierwsza tablice przypisuje do wylosowanych liczb
    [1] - zmieniam na [los1]
    [2] - na [los2]

    Tylko jak sprawdzić czy już taka liczba się wylosowała ? :(

    0
  • #5 17 Wrz 2011 13:22
    ed-ek
    Poziom 34  

    Ponieważ w podanych linkach są moje posty, podam trochę zmienione rozwiązanie.

    Kod: cpp
    Zaloguj się, aby zobaczyć kod

    0
  • #6 17 Wrz 2011 17:22
    arnoldziq
    Moderator Programowanie

    ed-ek napisał:
    Ponieważ w podanych linkach są moje posty, podam trochę zmienione rozwiązanie.
    Kod: cpp
    Zaloguj się, aby zobaczyć kod


    No to jeszcze kolega nam wytłumaczy, jak to jest związane z językiem Pascal, i wszystko będzie OK.

    0
  • #7 18 Wrz 2011 08:42
    ed-ek
    Poziom 34  

    Nawiedziła mnie pomroczność jasna. Szybko przetłumaczyłem na Pascala.

    Kod: pascal
    Zaloguj się, aby zobaczyć kod

    0