Program do školy – Pascal – Fórum – Programujte.com

Zdravím všechny na tomto fóru. Potřebovala bych pomoci s vytvořením programu, vůbec si s ním nevím rady. Našel by se někdo, kdo programování umí a poradil by mi?

Moje zadání:
Dva hráči hrají hru, při které střídavě odebírají zápalky z hromádky. Na začátku hry je na hromádce předem známý počet (N) zápalek. V jednom tahu může hráč odebrat 1, 2 nebo 3 zápalky. Hra končí ve chvíli, kdy některý z hráčů již nemůže táhnout (na hromádce už není žádná zápalka). Tento hráč, který nemůže udělat tah, hru prohrál.
Určete, pro které počáteční hodnoty N má při správné hře zajištěnou výhru ten hráč, který hru zahajuje. Napište program tak, aby vždy zvítězil počítač.

v pascalu se moc nevyznam, ale jelikoz je to tvuj domaci ukol aspon ti napisu posloupnost.

N>-PC vybere nahodne cislo 1,2,3 a zapocne hru>podle zvoleneho cisla zvoli dalsi
\
Uzivatel si vybere jakekoli cislo>podle logiky vybere dalsi cislo

atd dokud neni prazdno. Aby vyhral pocitac tak by musel porad vybirat vhodna cisla pro uzivatele ktery by se chytl prilezitosti a v posledni chvily mu sebrat.

V pythonu bych vedel vic

Navážu na jaduse jinak. *:D

Můžeš mít řádek s počtem zápalek.
Otestuješ jestli neni nula.
Vstup Readln(x); ktery načte číslo odebrání počtu
A zase se vrátíš v cyklu na počátek se zobrazenim počtu.

Když chceš aby vyhrálo PC, stačí ti podle toho kdo začíná
přehodit výherní N.

Druhý hráč vyhrává pro NN=(3+1)*x
x si určíš náhodné od 1 výše.
První hráč vyhrává pro N=NN-1, N=NN-2, N=NN-3

PC když chce vyhrát bere tak aby zůstalo NN na hromádce,
tudíž násobek 4. Pro poslední tah je to nula.

Navážu na o-Iox.
Strategie je následující: aby první vyhrál musí vždy odebrat tolik zápalek, aby na soupeře zbylo číslo beze zbytku dělitelné 4.
Z toho také vyplývá, že nemůže vyhrát (pokud soupeř strategii zná), když na počátku bude na hromádce počet zápalek dělitelný 4.
V příloze posílám program včetně zdrojáku. (jsou tam i vysvětlivky)

Ty Honzci stejně se mi nezdá ani trochu, to cos udělal, ty lidi se to nikdy pak nenaučí, děláš za ně domácí úkol, když se doma nudíš, místo šťourání v nose??
Ona myslim nežádala vypracování.
Pod nima podkopáváš leda zem, kam to pak sami dotáhnou .... gratuluju :smile13:
..Jestli takhle "svědomitě" kompenzuješ svou kdesi dřív zanedbanou pseudovýchovu :smile12:

To o-Iox
Ty už mě ale opravdu nes...
Co si o sobě myslíš? Že jsi Bůh nebo vedoucí tajemník, že rozdáváš morální ponaučení na každém kroku.

To Honzc :
Ale někdo se tu zdá velmi ale velmi vytočený, že by trefa do černého, ta bolí nejvíc že? :-))

Nebo naopak?, tvá chabá mysl neumí možná zauvažovat o dopadech tvých činů, lituju tě, ale co naplat s lidmi jako ty já nezatočím, vládne tomu admin.

Nemá asi cenu ti něco dál vysvětlovat, když máš preventivně zatemněnou-zaslepenou hlavu..
Doufám že nikdy nebudu mít tu čest potkat tvá rozmazlená děcka, jestli nedej bože existují...

To o-Iox
Poslední odpověď, neboť s takovými jako ty nemíním ztrácet čas.
Ty si fakt o sobě musíš myslet, že jsi Bůh nebo ten vedoucí tajemník, že bys chtěl s každým zatočit.
Co sem pleteš moje "rozmazlená" děcka, názory si vyměňujeme ty a já.

jen do sebe chlapi!

To Honzc :
Dobře smiluji se nad tebou, jsi naprosto ve všech ohledech zabedněná osoba. A kafemlýnek který omílá neustále -na rádoby obhajobu- to samé dokola.

Nejsem bůh, můžeš být klidný, v červa tě ještě dneska neproměnim, jenom si myslím a většina
uživatelů tohoto fóra to tu i pravidelně dává najevo, že dělat za někoho domácí úkoly
neni to pravé ořechové. Tečka.

Už nechceš odpovídat, škoda, mám pro tebe velmi jednoduchou otázku. Vypadá to, že děti snad máš,
potom když za tebou přišli s domácím úkolem, neváhal jsi a s radostí jim ho ihned pokaždé udělal?? Přece je nenecháš
chudáky samotné myslet? To byl tvůj přístup, jak měli jít připravení do života, nic sami neumět??
Nebo je ti to jedno až teď - nějaké cizí osoby, nemůžu se pořád dloubat v tom nose, tak jim to udělám, co mně je do nich viď :-((

Jediné jak ty umíš odpovídat je, jak píšu opakovat se a vyhýbat přemýšlení + byť jen kousku zodpovědnosti a to ti je přes padesát. Mně je o něco málo míň kamaráde a tohle mi prostě vrtá hlavou.

to Quiark: jak to myslíš :-))

No, vidím že se tady strhla menší hádka. Btw moc děkuji za pomoc.

Hele, o-loxi, nic proti tobe, programovat umis slusne, ale jestli si dobre pamatuju, zacal jsi s psanim ukolu za jine ty. A kdyz jsem ti rekl to same, co ty ted Honzcovi, pokousel ses me ohromit cizimi slovicky. Tak si prosim te vyber, na ktere strane stojis, a stuj tam. :smile20:

to Mircosoft :
Můžeš mi laskavě objasnit co zrovna ty se do toho máš potřebu míchat??
S člověkem jménem Honzc mám nevyřízený účet, a pak to "hlavní"
buď od té ochoty a ukaž mi, kde jsem TAKTO OKATĚ JAKO ON ROZTRUŠOVAL
BEZPRACNĚ DOMÁCÍ ÚKOLY.
Čekal bych příště že se vyjádříš k oněm slovíčkum hned a ne až po půl roce. :D

Na jaké straně kdo je, si osvojuješ posuzovat ze zcela zcestných indicií chabého počtu
..a asi žádáš nějaké slovíčko.. snaže se tak - ze sebe - jistě vypudit svůj pondělní choletit.
Co dodat, ďáblík je roztomilej ..loučí se deterentní o-lox

To o-lox : Víš, sice souhlasím, že je špatné dávat vypracované úkoly ostatním na opsání (resp. v ostatních věcech se to dá většinou přehlédnout, ale zrovna u programování je to "průser"), ale naprosto nesouhlasím s tím, co děláš. Dal jsi radu i ty, dal sem radu i Honzc. Ten, kdo o to žádal si vybere sám, jakou cestou se vydá. Pokud je to ženská na gymplu s nějakým "tvrdým" profesorem, která chce jít na humanitní výšku, nemyslím, že jakkoliv uškodí jednička z úkolu a ušetřený čas. Na druhou stranu pokud je to člověk, který studuje průmyslovku a má takovéhle zadání s tím, že ho programování baví, dal sem svůj dotaz jako poslední vlásek naděje a samotný program použije až pokud tvou radu opravdu nepochopí (což rozhodně není nemožné).

Nemá smysl vyjíždět na ostatní, ani se s nimi hádat, lidé jsou jací jsou. Spíš jsi měl apelovat na zakladatele topicu a ne na člověka, který si dal tu práci a dal někomu jinému i další možnost, otevřel další cestu, byť jen jednorázovou a z dlouhodobého hlediska špatnou (pokud by to ten zakladatel topicu chtěl dělat).

A co mi tim chceš naznačit, že se má lavírovat mezi přemýšlením a demencí? Že
v obchodě můžeš ukrást malé lízátko, když zrovna nejsi z tohoto kraje, nebo co sakra?
Dokud se budu vyjadřovat se servítkama bez prasáren
a nezačnu nadávat do kurev tak se jednoduše
do rvaček mezi krapet jinou generací (tedy
mne a "shnilýho" Honzce :) budou VĚDOUCNĚ plést o dost mladší mimina.
Takže dalšího reagujícího už - ať to bude kdokoliv schladí píčovodopád.

Tím neshazuji dané téma, jen nejsem ten koho by bavilo o čemkoliv diskutovat, vynech mě.

To o-lox : Vyjádřil jsem jen svůj názor. Jestli jej zařadíš do kategorie "koš a ostatní harampádí" (slušně řečeno) je jen na tobě, nechtěl jsem být ani urážlivý, ani nic podobného (což jsme snad ani nebyl). Za mě již OT končím a mlčím, jen jsem chtěl uvést svůj post na pravou míru.

Vyjádřil si vyjímky z vyjímek, kvůli kterejm pak - vyjímečně - nikdo nezůstává s čistým daňovým přiznáním.

To o-lox : Nevidim nic spatnyho na tom ze ten ukol udelal, to jestli to ona odevzda jako svoje reseni nebo se tim jen inspiruje, to uz je jen a jen na ni...

Btw Kolik ti je, ze tu jsou ostatni mimina?

To joudicek : Vůbec jsi nepochopil o čem jsem v posledních několika komentech psal, nejen proto jsi potom VELKÁ PÍÍÍÍČA. Děte všichni doprdele more, plantáš se a snažíš se mi dát rozhřešení, o které se tu snažim psát - mi tolik nejde. Kdo další je dement, tak velký jako ty, prosím nechť se podepíše dole... :-)))

:)

To o-lox : Hehe, no podle toho posledniho co jsi napsal te tipuju na takovejch 12 - 13? Pokud ti je vic, tak sem dej cislo uctu, ja ti neco poslu aby sis mohl koupit vozejcek a osetrovatelku....

To joudicek : Baví se s tebou někdo KRETÉNE, tak KOLOSÁLNÍ PÍČU jsem neviděl :D
Když to potřebuješ vědět je mi 13 let 6 měsíců 4 dny 15 hodin 7 minut 12 sekund ......

To o-lox : Tak to mas peska, kdyby si rek ze ti je vic, tak bych pustil chlup, takhle dostanes prd....

Sem se neovlád no, můžu to vzít zpět :D

Lidi, co takhle kompromis?

- Honzc omezi psani programu za jine (v tom s o-loxem souhlasim),
- o-lox omezi svuj impozantni slovnik vulgarismu a napadani ostatnich clenu fora,
- ja prestanu spamovat v cizich vlaknech, kde nemam co rict,
- a nejaky moderator to tu zamkne a promaze, protoze puvodni ucel diskuse uz je davno vyreseny.

To je ode me vsechno, hezky den vsem ;-).

Howgh.

To o-lox : Prijde na to, v kterej casti diskuze vidis to neovladnuti... :D