Srodne teme

13.01.2003. Overlay Window
07.02.2005. Zna li neko kako ovo radi
28.12.2004. Kako je ovo moguce???
21.04.2005. kako da uradim ovo kao na sajtu....
26.12.2005. hocu da sacuvam stanicu u operi ili IE sa tekstom..
09.01.2006. Pomoc pri izradi sajta...:-)
19.02.2006. Kako u corelu ovo obojiti ili osjenciti?
04.03.2006. kako da snimim ovo

Navigacija

Brisanje liste

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

kako bi ovo riješili?

[es] :: Pascal / Delphi / Kylix :: kako bi ovo riješili?	[ Pregleda: 1142 \| Odgovora: 4 ]	Postavi temu Odgovori

Autor

spaceman
teo dragović
Rijeka

Član broj: 14904
Poruke: 5
*.cmu.carnet.hr

Profil

kako bi ovo riješili?

^{02.04.2004. u 23:09}

trebam u pascalu napisati program koji bi za ucitanu rijec iz vec postojece datoteke trazio one rijeci koje se rimuju s ucitanom (znaci da su najmanje dva zadnja slova obe rijeci ista). nisam siguran dali se ovo ikako moze rijesiti rabeci string jer mi je nezgodno za ostatak zadatka upisivati char. svaki savjet ili kod je dobrodosao.
hvala unaprijed na pomoci.

^{02.04.2004. u 23:09}

Goranjak
Beograd

Član broj: 18185
Poruke: 19
*.etf.bg.ac.yu

Profil

Re: kako bi ovo riješili?

^{03.04.2004. u 10:00}

Probaj sa ovim da uporedjujes rimu dve reci Rec i ProbnaRec koje su tipa String, kao i KrajReci i KrajProbneReci. Za ostatak programa i modifikaciju ovog koda poptrudi se sam, a ako bas zapne tu sam.

...
KrajReci := copy(Rec,length(Rec)-1,2);
KrajProbneReci := copy(ProbnaRec,length(ProbnaRec)-1,2);
if KrajReci = KrajProbneReci then ... {ProbnaRec se rimuje sa Rec}
...

p.s. Ovo radi samo u TurboPascal-u, a ne i u standardnom Pascal-u, ako to uopste ima neke veze.

Ako kaniš pobjedit, nemoj izgubit!

^{03.04.2004. u 10:00}

spaceman
teo dragović
Rijeka

Član broj: 14904
Poruke: 5
*.cmu.carnet.hr

Profil

Re: kako bi ovo riješili?

^{18.04.2004. u 16:13}

ovo gore mi je puno pomoglo, hvala jos jednom.
u tpw mi radi sve sasvim fino, ali sad imam jedan drugi problemćić
naime, kako je lista ispisanih rijeci poduža i ne stane cjela u jedan prozor trebao bih omoguciti scrollanje (a ne znam dali je to uopce moguce u pascalu).ako netko zna kako to podesiti ili ima neki drugi nacin nek mi napise.hvala.

^{18.04.2004. u 16:13}

rilax
Sergio Reluck
/root/Serbia/Kurshumliya

Član broj: 22393
Poruke: 32
*.vdial.verat.net

Profil

Re: kako bi ovo riješili?

^{18.04.2004. u 17:44}

koristi TView - imas kom[ponentu za prozor

Inace u DOSu sa writeln ne mozes da postignes skrolovanje.

Jedini nacin je

var i: integer;
i:=0;

pa svaki put kada pozoves writeln stavis
inc(i);
if i=23 then begin readln(); i:=0; end;

10 BEGIN
20 HOME_SWEET_HOME
30 GOTO 20

^{18.04.2004. u 17:44}

spaceman
teo dragović
Rijeka

Član broj: 14904
Poruke: 5
*.cmu.carnet.hr

Profil

Re: kako bi ovo riješili?

^{19.04.2004. u 22:17}

program moram rijesiti u TPW-u, tak da nema DOS-a

upiso sam ovo gore u proceduru za ispis i sad mi izgleda ovako:
procedure ispis;
var a:string;
begin
reset (r);
repeat
read (r,a); writeln (a);
inc(i);
if i=23 then begin
readln;i:=0;
end;
until eof (r);
end;

s tim da je r file of string, i sad mi samo ispisuje prvih 23 upisanih rijeci, ostale nista

^{19.04.2004. u 22:17}

[es] :: Pascal / Delphi / Kylix :: kako bi ovo riješili?

[ Pregleda: 1142 | Odgovora: 4 ]

Srodne teme

13.01.2003. Overlay Window
07.02.2005. Zna li neko kako ovo radi
28.12.2004. Kako je ovo moguce???
21.04.2005. kako da uradim ovo kao na sajtu....
26.12.2005. hocu da sacuvam stanicu u operi ili IE sa tekstom..
09.01.2006. Pomoc pri izradi sajta...:-)
19.02.2006. Kako u corelu ovo obojiti ili osjenciti?
04.03.2006. kako da snimim ovo

Navigacija

Brisanje liste

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