Datotekacki tip podataka

Datotekacki tip podataka

offline
  • Milan
  • Pridružio: 12 Jan 2012
  • Poruke: 40
  • Gde živiš: Republika Srpska, Bijeljina

var  s:file of string;  a:array[1..3] of string;  i:integer; begin  assign(s,'spisak');  reset(s);  i:=0;  while not eof do   begin    i:=i+1;    read(s,a[i]);    writeln(a[i]);   end;  close(s);  readln(); end.   

Napravio sam fajl spisak i kada pokusam da ga ispisem pomocu ovog koda ne pise mi nista na ekranu.S ovim kodom sam provjerio i radi:
var  s:file of string;  a:array[1..3] of string;  i:integer; begin  assign(s,'spisak');  reset(s);  for i:=1 to 3 do   begin    read(s,a[i]);    writeln(a[i]);   end;  close(s);  readln(); end.   

Tek sam poceo da radim sa datotekackim tipom podataka, a potrebno mi je za maturski rad, tako da bi mi koristio i neki tekst na internetu za ovo, nesto sam citao ,ali ne objasnjava nista vezano za ovo. Hvala na pomoci.



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Srđan Tot
  • Am I evil? I am man, yes I am.
  • Pridružio: 12 Jul 2005
  • Poruke: 2483
  • Gde živiš: Ljubljana

Koliko vidim, problem je što pozivaš funkciju eof bez parametara. Ako je tako pozoveš, onda ona proverava da li ima još podataka na standardnom ulazu (u većini slučajeva je to ulaz sa tastature). Pozovi funkciju ovako:
eof(s)
Obrati pažnju i na to da ćeš dobiti grešku ako datoteka ima više od 3 linije, jer će taj kod pokušati da upiše 4. liniju u a[4].

Nažalost, ne mogu da nađem ništa konkretno na internetu što bi mogao da iskoristiš za bolje razumevanje ovakvog rada sa datotekama.

Uvek možeš ovde da pitaš ako ti nešto nije jasno Smile



offline
  • Milan
  • Pridružio: 12 Jan 2012
  • Poruke: 40
  • Gde živiš: Republika Srpska, Bijeljina

Srki_82 ::Koliko vidim, problem je što pozivaš funkciju eof bez parametara. Ako je tako pozoveš, onda ona proverava da li ima još podataka na standardnom ulazu (u većini slučajeva je to ulaz sa tastature). Pozovi funkciju ovako:
eof(s)
Obrati pažnju i na to da ćeš dobiti grešku ako datoteka ima više od 3 linije, jer će taj kod pokušati da upiše 4. liniju u a[4].

Nažalost, ne mogu da nađem ništa konkretno na internetu što bi mogao da iskoristiš za bolje razumevanje ovakvog rada sa datotekama.

Uvek možeš ovde da pitaš ako ti nešto nije jasno Smile

Hvala!! Sad me sramota kad vidim sta sam zaboravio. Embarassed To za 4 linije znam, zato sto sam stavio 3 linije teksta u fajl pa sa u var deklarisao samo do tri jer vec znam unapred Very Happy Hvala jos jednom Very Happy

Ko je trenutno na forumu
 

Ukupno su 739 korisnika na forumu :: 40 registrovanih, 7 sakrivenih i 692 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 9k38, bato, cenejac111, Cirkon, crnitrn, Dimitrise93, djboj, dragoljub11987, dragon986, Drug pukovnik, flash12, Fulcrum, Gama, Georgius, krkalon, KUZMAR, ladro, Lucije Kvint, Marko Marković, MB120mm, mercedesamg, milekNS, milos.cbr, mrav pesadinac, nebkv, repac, rodoljub, sombrero, sovanova95, stegonosa, time, Trpe Grozni, vasa.93, voja64, Vojkan Milovanovic, Wisdomseeker, zexoni, |_MeD_|, Živković, Čivi