Lotto w turbo pascal. Jak wyeliminować powtarzanie się liczb?

Question

Lotto w turbo pascal. Jak wyeliminować powtarzanie się liczb?

odpowiedni17 21 Maj 2011 21:22 3014 7

Odpowiedz Nowy temat

#1 21 Maj 2011 21:22

odpowiedni17 odpowiedni17

Poziom 2

#1 21 Maj 2011 21:22

witam. mam prośbę do was. czy mógłby ktoś napisać lub pomoc mi napisać totolotka w turbo pascalu? sam próbowałem lecz co jakiś czas liczby sie powtarzają i tu tkwi mój problem. nie piszcze żebym poszukał w necie bo sprawdzałem i nic mi to nie pomogło. z góry dziękuję!
0 7
#2 21 Maj 2011 21:30

yogi009 yogi009

Poziom 42

Pomocny post? (0)

#2 21 Maj 2011 21:30

No to dam Ci wędkę, zamiast rybki. Algorytm powinien w uproszczeniu wyglądać tak:

-. mamy 49 liczb kolejnych,

-. tworzymy 6 zmiennych, w których zapamiętamy wylosowane wartości,

-. w pętli sześciokrotnie losujemy z 49 liczb (sądzę, że uzyskanie liczby losowej nie jest dla Ciebie problemem) z tym, że dajemy prosty warunek:
wylosowana liczba nie może być taka sama, jak którakolwiek z sześciu zmiennych przechowujących wyniki

-. na koniec wyświetlamy sześć wylosowanych wartości

Powodzenia.
0

Promuję tematy:
28.12.2017 F Meter wg projektu IK3OIL
28.12.2017 LC Miarka na podstawie projektu VK3BHR
20.12.2017 Lampki LED na choinkę - wersja na Attiny84
14.11.2017 Przedwzmacniacz mikrofonowy oparty o układ SSM2019
27.10.2015 Miniwiertarka AD-628S (z AVT) - wymiana sterownika
14.05.2015 Nie daj się złodziejowi, czyli klasyczny prosty alarm na układach CMOS

#3 21 Maj 2011 21:58

Xitami Xitami

Poziom 29

#3 21 Maj 2011 21:58

Code:

n:=0;

while n<6 do begin

    t[n+1]=random(49)+1;

    i:=1;

    while t[i]<>t[n+1] do inc(i);

    if i>n then inc(n)

end;

//t[1..6]

#4 21 Maj 2011 22:03

yogi009 yogi009

Poziom 42

Pomocny post? (0)

#4 21 Maj 2011 22:03

Kolega Xitami lubi odrabiać lekcje za kogoś...
0

Promuję tematy:
28.12.2017 F Meter wg projektu IK3OIL
28.12.2017 LC Miarka na podstawie projektu VK3BHR
20.12.2017 Lampki LED na choinkę - wersja na Attiny84
14.11.2017 Przedwzmacniacz mikrofonowy oparty o układ SSM2019
27.10.2015 Miniwiertarka AD-628S (z AVT) - wymiana sterownika
14.05.2015 Nie daj się złodziejowi, czyli klasyczny prosty alarm na układach CMOS
#5 21 Maj 2011 22:10

Xitami Xitami

Poziom 29

Pomocny post? (0)

#5 21 Maj 2011 22:10

z nudów nie takie rzeczy się robi
0
#6 21 Maj 2011 22:12

odpowiedni17 odpowiedni17

Poziom 2

Autor tematu Pomocny post? (0)

#6 21 Maj 2011 22:12

Co do tej podpowiedzi to wiem jak zrobić żeby losowalo i wyświetlało, lecz nie wiem w jaki sposób zrobić te sprawdzanie czy wylosowana liczba sie nie powtarza.
0
#7 22 Maj 2011 00:14

yogi009 yogi009

Poziom 42

Pomocny post? (0)

#7 22 Maj 2011 00:14

Możesz zrobić wewnętrzną pętelkę do sześciu sprawdzającą czy wylosowana liczba nie jest identyczna z którąś ze zmiennych (u góry dostałeś kod z tablicą wypełnioną wynikami). No a samo porównanie zmiennych to już chyba rozgryziesz, jeżeli coś jest równe czemuś, to powtórz losowanie, w przeciwnym wypadku wykonaj następny obrót pętli głównej.
0

Promuję tematy:
28.12.2017 F Meter wg projektu IK3OIL
28.12.2017 LC Miarka na podstawie projektu VK3BHR
20.12.2017 Lampki LED na choinkę - wersja na Attiny84
14.11.2017 Przedwzmacniacz mikrofonowy oparty o układ SSM2019
27.10.2015 Miniwiertarka AD-628S (z AVT) - wymiana sterownika
14.05.2015 Nie daj się złodziejowi, czyli klasyczny prosty alarm na układach CMOS
#8 22 Maj 2011 10:46

odpowiedni17 odpowiedni17

Poziom 2

Autor tematu Pomocny post? (0)

#8 22 Maj 2011 10:46

Dzięki za pomoc. Liczby już się nie powtarzają.
0

Odpowiedz Nowy temat