Diskuze: Pascal- Ročníková práce

Ostatní jazyky Delphi Delphi (Pascal) Pascal- Ročníková práce

Avatar
Lasserus
Neregistrovaný
Avatar
Lasserus:

Aho j hoši prosím Vás pomožte s mím programem který má počítat kolik slov začíná a končí stejným písmenem. Moc vás o to prosím už si fakt nevím rady

 
Odpovědět 27.5.2011 23:08
Avatar
sdraco
Tým ITnetwork
Avatar
Odpovídá na Lasserus
sdraco:

Jako spočítat slova jako je třeba ANAKONDA nebo KUK?
To je jednoduché, asi nejjednodušší způsob je tento:
Ze začátku si přidej před řetězec a za řetězec mezeru.
Pak ti stačí jediný průchod řetězce třeba FOR cyklem. Udělej si počítadlo slov, to vynuluj. Udělej si proměnnou stav, kterou nastav na MIMO_SLOVO. Projedeš cyklem znak po znaku řetězec a když budeš stát na pismenku, nastav stav VE_SLOVE a zapis si ktery je tam znak. Potom při najetí na mezeru se podívej jaký byl znak předtím, porovnej je, případně zvyš počítadlo slov, pokud jsou stejné. Stav nastav na zpět na MIMO_SLOVO a pokračuj tak dále.
Pokud umíš alespoň hrubé základy, tak bys to měl zvládnout.

Nahoru Odpovědět 27.5.2011 23:46
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
Avatar
Lasserus
Neregistrovaný
Avatar
Odpovídá na David Čápka
Lasserus:

No právě potřeboval bych už udělanej celej kód, já měl mám práci už skoro hotovou ale s tímto podprogramem si fakt nevím rady jinak zadání je Na vstupu je dán text (max. 255 znaků).
Zjisti a) Kolik obsahuje vět (věta je zakončená ., !, ?). Mám
b) Kolik slov končí písmenem a. Mám
c) Která písmena anglické abecedy se v textu nevyskytují. Mám
d) Kolik slov začíná a končí stejným písmenem. Nemám

Moc prosím.

 
Nahoru Odpovědět 28.5.2011 11:41
Avatar
sdraco
Tým ITnetwork
Avatar
Odpovídá na Lasserus
sdraco:

Myslím, že jsem ti napsal vše, co potřebuješ. Pokud jsi již napsal to, co tvrdíš, jistě pro tebe nebude problém podle mého návodu dopsat tu poslední funkčnost. Tady za tebe nikdo psát kód nebude, rádi pomůžeme, ale nemáme prostředky ani chuť řešit za někoho domácí úkoly.

Nahoru Odpovědět 28.5.2011 11:48
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
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 4 zpráv z 4.