Adott 7 db változó bennük 1 db számmal, hogyan tudnám megvizsgálni hogy van-e benne 2 egyforma 3 egyforma stb? (póker program lenne)

Úgy, hogy nem hét változót használsz, hanem más, okosabb adatszerkezetet.

Bájdövéj pókerhez a lapokat nem tudod számokkal reprezentálni, ugyanis fontos a színük is.

Ezekhez mindenképpen valamilyen rekord kell.

Először.

7db változó helyett használj tömböt vagy listát. :)

Másodszor.

Szerintem sokkal jobban járnál, ha egy lapot nem 2 karakterrel reprezentálnál, hanem egyetlen számmal, a sorszámával a pakliban (0..51). :) Két okos matematikai művelet a barátod: egészosztás és maradékképzés, ezekkel megkaphatod a színt és a rangot bármikor.

Harmadszor.

Egyforma rangok/színek keresését én így oldanám meg: nyitnék egy számláló tömböt, amit a kártya rangjával/színével indexelnék. Végigmennék ciklussal a 7 kártyán, és hozzáadnék a megfelelő számlálóhoz egyet. Ezután végigmennék a számláló tömbön, és megnézném, melyikből van 2, 3, vagy több.

Ilyen programot egyértelműen rekorddal oldanék meg esetleg objektum orientáltan :D

De valami ilyen módon lehetne:

db:=1

ciklus i=1-től 7-ig

ciklus j=1-től 7-ig

Elágazás ha t[i]=t[j]

db:=db+1

Elágazás vége

Ciklus vége

Ciklus vége

Ezzel párt, drillt és pókert tudsz tesztelni.