Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal

[es] :: Pascal / Delphi / Kylix :: pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal

[ Pregleda: 3319 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

atlas

Član broj: 20158
Poruke: 167
*.as54.ze.bih.net.ba.



Profil

icon pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal13.04.2005. u 22:29 - pre 231 meseci
mozel pomoc oko ovog programa.........
zamislio sam ovako

da petlja ide od 1 do broj znakova recenice i kad naide na prazno mjesto da brojac postavi na nulu i od broja znakova oduzme broj na kom je prazno pa sve tako..
ali nikako da konstruisem program.......
kako biste ovo resili vi
 
Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314



+102 Profil

icon Re: pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal13.04.2005. u 22:39 - pre 231 meseci
Recimo da imas string sentence gde ti se nalazi recenica. Ovo pisem iz glave pa mozda ima neka sitna greska :

Code:

var
  C1  : Integer;
  tmp : String;
  ml   : Integer;
begin
  ml := 0;
  tmp := sentence;

  repeat
    If Pos(' ', tmp) - 1 > ml Then
      ml := Pos(' ', tmp) - 1;
    tmp := Copy(tmp, Pos(' ', tmp) + 1, Length(tmp) - Pos(' ', tmp));
  until Pos(' ', tmp) = 0;
end.
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal13.04.2005. u 23:01 - pre 231 meseci
Ne zaboravi da reci moze da razdvaja i samo , ili - ili ; ili : ili neki drugi znak.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: pr: (u unesenoj recenici pronaci i ispisati najduzu rec) Pascal

[ Pregleda: 3319 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.