Pomoc s Pascal

Programovacie jazyky, rady, poradňa...
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

Som začiatočník s pascalu a potreboval by som pomoc s programom ak by niekto vedel ,už si sam neviem rady a som v časovej tiesni mam nato už len 1 deň tak hľadám pomoc. Ak by niekto mohol poskytnúť program som mu vďačný.
S týmto programom :
Zostavte program a algoritmus, ktorý zistí počet slov vo vete a zoradí slová podla počtu znakov.
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Pomoc s Pascal

Príspevok od používateľa audiotrack »

dobre, skús zostaviť teda iba algoritmus (slovný postup ako by si to robil) a s prepisom do pascalu ti pomôžeme
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Re: Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

po zadani vety ulozi do premennej zaroven cez string ktore cez for potom dokonca prejde a a cez podmienku otesteju ak su tam potom nejake ine znaky ako pismena tak da že tam je slovo k zoradeniu som este neprisiel
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Pomoc s Pascal

Príspevok od používateľa audiotrack »

to neviem v akom jazyku si písal, tak ti poradím:
1) Načítaš vetu
2) rozdelíš ju podľa medzier do poľa
3) prejdeš každým prvkom poľa a zistíš dlžku príslušného slova
4) vypíšeš slova podľa ich dlžky

Teraz to skús hodiť do pascalu. Keď sa zasekneš, tak sem hoď svoj zdroják (ktorý si spravil aspoň do bodu kedy si sa zasekol)
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Re: Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

Tak skusil som ale nvm ci som spravne pochopil
:

Kód: Vybrať všetko

Program slova;
uses crt;
var t:text;
    c:char;
    pocet:integer;
    pal:byte;
    s:string;
begin
     clrscr;
assign (t,'C:\lokal.txt');
reset(t);
pocet:=0;
while not eof(t) do begin
      read(t,c);
        if C=' ' then inc(pocet); {pocet+1}
                
                 end;
                            writeln ('pocet slov je ', pocet-1);

                                 readkey;
                                  readln;
      end.
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Pomoc s Pascal

Príspevok od používateľa audiotrack »

keď to chceš robiť takýmto spôsobom, nebudeš schopný zoradiť slova podľa dlžky. Dokážeš ich iba zrátať, prípadne vypísať dlžky slov.
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Re: Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

sak ich potrebujem zratat a potom zoradit asi cez polia nvm
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Pomoc s Pascal

Príspevok od používateľa audiotrack »

áno, a kde tam máš pole? Zrátať sa dajú aj bez poľa (a práve to robíš). Ale keďže v zadaní je aj ich zotriedenie a vypísanie, musíš tam pridať to pole (a rovno pri čítaní súboru ho naplňať slovami)
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Re: Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

hmm a to ako nejako nechapem
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Re: Pomoc s Pascal

Príspevok od používateľa audiotrack »

to záleží ako máš ten súbor zapísaný. Podľa toho čo si spravil v tom pascale vypadá, že každé slovo v novom riadku (a medzera jet eda vlastne prázdny riadok). Ja si ale vetu predstavujem inač. Takže sa rozhodni ako budú vstupy (veta) do tvojho programu zadávané a potom sa môžme baviť o konkrétnejšom načítavaní (dokonca v zadaní sa súbor ani nespomína, takže ak je to takto volné zadanie že si ho môžeš prispôsobovať, tak s každým slovom v osobitnom riadku to bude najjednoduchšie)
Blbec Andy
Novice
Novice
Príspevky: 6
Registrovaný: 29 mar 2010, 15:51

Re: Pomoc s Pascal

Príspevok od používateľa Blbec Andy »

Najradsej by som bol keby si to program sam vipital tu vetu sam ale nvm ako to cesto spravit ,ako chapem ked mi to visvietlia ale mam problem to zapisat

//autoeditácia príspevku (08 Apr 2010, 11:34)
Veľmi pekne ďakujem za poskytnutú pomoc.
vadal
Novice
Novice
Príspevky: 5
Registrovaný: 20 apr 2010, 21:49

Re: Pomoc s Pascal

Príspevok od používateľa vadal »

ahojte...ja mám tiež to isté zadanie a a mám taký isty problem neviem to!
Mám problem s priradeným slov do pola. Bol by som veľmi vďačný keby ste mi poradili...za odpisy a rady vopred dakujem
BX
Addict
Addict
Používateľov profilový obrázok
Príspevky: 4572
Registrovaný: 10 jan 2008, 15:30

Re: Pomoc s Pascal

Príspevok od používateľa BX »

S čím že máš problém?
Napísať odpoveď