fps nuskaitymas, rasymas i faila, neranda rinkmenos :(

turiu tokia bedele, man neranda paskalis rikmenos, seip viska gerai darau, sulei viskas gerai veikia viska ta pati namie darau ir neranda rinkmenos :( gal kas zinot kodel?

Galėtum kodo fragmentą parodyti kur kreipiesi į rinkmeną?

Galėtum kodo fragmentą parodyti kur kreipiesi į rinkmeną?

program ûgiai;

var fr, fd : text;

i, n : integer;

suma, vvu, min, max, x : real;

begin

Assign (fd,'duom.bin'); reset(fd);

Assign (fr,'rez.bin'); rewrite(fr);

suma := 0;

max := 0;

min := 3;

ReadLn (fd, n);

ReadLn(fd, x);

for i := 1 to n do

begin

suma := suma + x;

if x > max

then max := x;

if x < min

then min := x;

end;

vvu := suma / n;

WriteLn (fr, 'vaiku viautinis ugis ', vvu:2:2,' didziausias ugis ', max:2:2,' maziausias ugis ', min:2:2);

Close(fd);

Close(fr);

end.

tokia programa dariau ir neranda nors mokykloje viskas gerai, kad issaugot programa, paskui susikurti tekstini failiuka kuri pavadint reik duom.bin, ten irasyti duomenis tai tiek zinau bet vistiek neveikia :\

O tu viską kur išsaugojai? Atskirame kataloge? O mokykloje randa duomenų failą?

O tu viską kur išsaugojai? Atskirame kataloge? O mokykloje randa duomenų failą?

susikuriau aplanka butent tai programai,ir ten issaugojau ir programa ir faila duomenu

Susirask tą savo duom.bin, paspausk properties ir pažiūrėk į location. Nukopink, tada ten kur Assign (fd,'duom.bin'); rašyk tai ką pamatysi location'e ir pridėk duom.bin. Pvz. Assign (fd,'C:\Users\Agne\duom.bin');

edit: A, jeigu vienam kataloge, tai tikriausiai nepadės tau. Tikriausiai problema su duom.bin failu. Gal blogai pavadinai, netyčia .bin pridėjai du kartus ar pan. Pabandyk dar sukurti tekstinį failą (.txt) ir tada kur assign irgi pakeisk.

vistiek neranda :angry: tiek to gal mano mokytojas pades

Gal kartais pas tave įjungtas plėtinių slėpimas(tada bus blogai sukurta byla pas tave)? Pamandyk nueiti (Explorer) -> View -> Folder Options , ir ten paieškoti, kažkur turi būti pasirinkimas „Hide extensions“. Nuėmus varnelę, gali nustebti pamačius kažką panašaus į data.bin.txt, vietoje saviškio data.bin

Aciu simonai, padejai :D