Anonymní profil rl – Programujte.com

Nie takto to nefunguje. Pise totiz "Unknown identifier", pascal si mysli, ze to je premenna. Vyzera to, ako ked chces pouzit clrscr; a nemas na zaciatku napisane uses crt; (ja to na zaciatku mam).

Uz mi funguje ta funkcia Pos. Spravne mi vypisuje pri 1. riadku cislo 8.
Teraz vsak chcem pouzit toto: SubStr(str1,N,position,str2);
vypisuje Unknown indentifier. Dokonca som skusal aj Turbo Pascal

Mam to zatial takto:

procedure jeden;

var f:text;

    riadok,meno:string;

    i:integer;

begin

assign(f,'h:\LZ\ziaci.txt');

reset(f);

readln(f,riadok);

i:=Pos(' ',riadok);

Substr(riadok,0,i,meno);

writeln(meno);

close(f);

end;

To Krychlik :

Dakujem za navod. Avsak funkcia "pos" mi akosi nefunguje:

Zacal som robit len to odtrhnutie casti retazca:
procedure jeden;
var f:text;
riadok:string;
i:integer;
begin
assign(f,'h:\LZ\ziaci.txt');
reset(f);
read(f,riadok);
if riadok=' ' then i:=Pos(' ',riadok);
writeln(i);
end;

Vypise cislo -29948, co je hlupost, lebo v prvom riadku sa v txt subore medzera nachadza na 8. mieste

Zdravim,

mam txt-subor, kde mam v 1 riadku nasledujuce udaje: priezvisko, meno a sumu (t.j. cislo).
V programe to ma by tak, ze zadam priezvisko a ono v subore vyhlada mnou zadane priezvisko a k nemu zobrazi i prislusnu sumu. Ako mam riadok v subore rozdelit na tri casti prizvisko, meno a suma? Dakujem za pomoc.

Super... :) Nádherné spracovanie.

Tie sviňe sú von na kauciu, ktorú zložili ich rodičia!

9540 + 50 = 9590

Takže to máme 9520 + 20 = 9540

Mne sa to, náhodou, až na tie hranaté hrany páči :-)

Enuyvatar ma uz sere :smile20: Zdvihal som cinky a teraz neviem ani len ohnut ruku do viac ako praveho uhla... :(
Nastastie, uz je to ako-tak za mnou... :smile16:

8700 +10 = 8710

LOL :D Odkedy "zohnat" znamená stiahnuť, Survik? Aj ja chlieb zháňam v obchodoch, nekradnem ho. Keby Tokan napísal "Ozvi sa mi na ICQ a ja ti poviem, odkiaľ si hru stiahnuť", samozrejme, máš sčasti(!) pravdu. Nakoľko však napísal "Ozvi sa mi na ICQ a ja ti poviem, odkiaľ si zohnaťtú hru", nemáš ABSOLÚTNE žiadne právo (morálne, technické ti totiž pridelil Curo) zmazať takýto príspevok.

7330 + 44 = 7374

6705 + 30 = 6735

prehravam z HDD. Skusal som v roznych, vsade seka. dokonca aj minimalisticke prehravace. vodiktom by mohlo byt, ze vytazenie procesora vzdy vystupi na 100% (okamzite).

5625 + 40 = 5665

Enuyvatar - zrobis viac? :smile20: (vyzva :smile7: )

up, nikto mi nevie poradit?

Zdravím.

Nemám vôbec žiaden problém s ripnutými 720p či 1080i-čkovými filmami, ale akonáhle si chcem pustiťBlu-Ray film (neripovaný, proste Blu-Rayácke formáty), čo je už tuším FullHD, je to nepozerateľné... proste to neskutočne seká.

Mám zostavu:

Intel Celeron D 3.2GHz 512kB 64bit s775
2x512 (=1024) MB Ram DDR2 667MHz
Grafika Inno 3D, GeForce 7600GST 128MB/128bit DDR3

Ktorý(é) z týchto komponentov mi to brzdí(ia)? Treba niečo dokúpiť, či rovno vymeniť? Nepostačilo by niečo povedzme pretaktovať? Vďaka.

je mi luto, ale fakt o 12tej neviem, kolko a ci vobec este nejake kliky spravim o 17:36. Toto mam najradsej. Clovek sa do niecoho rad zapoji a takuto ma odozvu. Ked sa ti nepaci, rob si kliky sam. A len tak mimochodom, nie som prvy, co porusil pravidla ;)

1300 +20 = 1320

SURVIK: taketo veci rieste prosim cez PM, tu su len statistiky

1204 +73 = 1277Editoval Peter2: So Smokiem sme pridali naraz...

zapajam sa. :)