fisier de 50 GB cum se prelucreaza cu pascal ???

[•ionzlatan]

Salutare


Toata nebunia a luat sfarsit,.., cel putin asa am crezut , pana la proba contrarie

Problema mea era sa generez solutiile A de N luate cate K unde N = 80 si K = 20
am rezolvat-o (done)

dupa aceea trebuia sa gasesc metoda de a compara solutiile obtinute pe criteriul sumei
adika se dau spre ex suma minima 500 si suma maxima 800

au un numar de n+1 solutii (randuri)

trebuia scris programelul care sa afiseze numerele comune (adik cele care se repeta) in aceste solutii
Teoretic e gata (done ) problema depasita si asta

acum trebuie sa extrag aceste solutii adik fiecare aranjament in parte, sa vad care intre intre aceste doua cerinte suma nimima si suma maxima

problema e ca la acea comanda ASSIGN( F, NUME)
imi da o eroare frumoasa
ERROR5. ! FILE ACCESS DENIED

intrebarea mea este !!!

CUM SA ACCESEZ FISIERUL ACESTA CA SA IL POT CITI ?

VREO IDEE ?

am incercat asa

Cod:

program calcul;
uses crt;
var
nume,nume2:string;
f,g:text;
suma, smin, smax: integer;
ch:byte;

begin
writeln;
writeln;
writeln(' Numele fisierului : => '); read(nume);
clrscr;
assign(f,nume); reset(f);
writeln;
writeln;
writeln(' Numele fisierului de iesire :'); read(nume2);
assign(g,nume2); rewrite(g);
clrscr;
writeln;
writeln;
Writeln(' Suma minima : => '); read(smin);
writeln;
writeln(' Suma maxima : => '); read(smax);

repeat
suma:=0;
while not eoln(f) do
read(f,ch);
suma:=suma+ch;
for suma:= smin to smax do
begin
write(ch,' ');
write(g,ch,' ');
end;
begin
readln(f);
end;
until eof(f);
readkey;
end.

insa eroarea de mai sus nu imi da voie
as vrea sa stiu cum sa fac sa il accesez
am nevoie de el ,  datele ce trebuiesc prelucrate sunt in el

ma gandeam ca exista ceva comenzi care il forteaza sa incarce in memoria virtuala
i-am dat voie windows-ului meu XP sa faca 60 GB de Swap, numai sa pot sa incarc acest fisier,
problema de acum este ca nu vrea sa faca ASSIGN (F, NUME)

VREO IDEE ?
multumiri anticipate

[•blasterz]

Sistemul de operare e pe 64 biti? dar compilatorul? Ce file system ai? NTFS?
Daca astea sunt pe 32 biti, nu suporta decat fisiere de maxim 2^32 bytes, adica vreo 4 GB.

[•ionzlatan]

sistemul este Win XP pe 32
iar compilatorul  apartine lui Borland pascal
ce sa fac sa trec pe 64 de bitzi
sa fac rost de alta varianta de pascal
sau pe amandoua ?

scuze ca inreb dar chiar nu mai inteleg

{oare un sistem de operare pe 64 de biti poate deschide un fisier de 50 de GB ?[/b]

[•SpiderMan]

Iti trebuie sistem de operare pe 64 biti, Xp / Vista / Win 7. Xp-ul e cam aiurea pe 64 biti, e nereusit, si dintre Vista si 7 e clar mai bun ca orice 7, si ca cerinte si ca tot. FPC-ul il poti lua pe 64 biti, dar daca ai sistem de operare pe 32 biti, nu ai ce face cu el, nici nu cred ca se poate instala.

[•ionzlatan]

mi-ai face un mare bine daca mi-ai scrie si un link de unde sa iau FPC pe 64 de biti
si inca o intrebare
tre sa schimb si partitiile ??  ddaca da, din NTFS in CE ?

scuze dar am ramas mult in urma cu tehnologiile astea (la drept vorbind nu credeam sa ma lovesc atat de tare de PC mai ales la Biserica, dar orice hobby e bine venit nu ?)

Scuze pt palavrageala in plus.... dar e specialitatea mea !!!

[•SpiderMan]

Omule, sistemul tau de operare e pe 32 biti, trebuie schimbat, adica REINSTALAT altul nou (de preferat altul decat XP, Xp pe 64 biti e complet aiurea). Apoi, daca ai PC vechi, s-ar putea sa nu suporte sistem de 64 biti, ceea ce este iara naspa, ca nu ai cum sa instalezi, si dupa cum te vad sigur nu-i prea nou pc-ul tau (ziceai ca ai ramas in urma ...). Asadar, daca nu ai un CPU mai bun sau o placa de baza mai ok, nu cred ca poti sa faci asta. In plus, daca ai 32 biti, nu are cum FPC-ul sa mearga pe 64 biti. E ca si cand tu ai un sistem cu 2 gauri, si ai 2 placute : una cu 2 si una cu 3 gauri si vrei aia cu 3 gauri s-o bagi in sistemul tau, ceea ce e imposibil. Asa e si cu sistemul tau de 32 biti, n-ai cum FPC-ul (placuta) sa il bagi pe sistemul tau. Sper ca ai inteles analogia.

[•ionzlatan]

nu iti fa probleme de asta
ideea era ca in ultimul timp nu prea ma m-am interesat  de calculator
asta nu inseamna ca e vechi
ma refeream la faptul ca  nu prea le am eu ....dar nu conteaza

Oricum Multam pentru sfat
acum m-am pus la Down   cu 7-le pe 64 bit

de unde ziic ca pot sa iau pascal pe 64 bit ??

[•soriyn]

 Totusi chiar merita efortul ? Pentru ce iti trebuie ?  

Offtopic: Robert eu cred ca ar trebui sa renunti la stilul asta agresiv de a raspunde. Mereu faci asa si e iritant mai ales cand scrii bold sau cu majuscule. Nu cred ca are nevoie de analogiile tale. Mi se pare ca omul a inteles ca ii trebuie un sistem nou. A fost intrebat ce partitii are si normal ca s-a gandit sa ca poate trebuie schimbat tipul lor.

[•blasterz]

mi-ai face un mare bine daca mi-ai scrie si un link de unde sa iau FPC pe 64 de biti
si inca o intrebare
tre sa schimb si partitiile ??  ddaca da, din NTFS in CE ?

scuze dar am ramas mult in urma cu tehnologiile astea (la drept vorbind nu credeam sa ma lovesc atat de tare de PC mai ales la Biserica, dar orice hobby e bine venit nu ?)

Scuze pt palavrageala in plus.... dar e specialitatea mea !!!

NTFS e bun. Era problema daca aveai fat32 sau altceva...

Cred ca asta e bun (desi nu l-am testat):
http://www.freepascal.org/download.var

[•ionzlatan]

salutare din nou

ok  foarte buan faza cu win pe 64
am pus si asa ceva si am luat si FPC pe 64
dar exista o problema

nu asculta de program si nu pot sa dau assign

ce sa fac
tre sa termin cu programelul asta
 

Cod:

program calcul;
uses crt;
var
nume,nume2:string;
f,g:text;
suma, smin, smax: integer;
ch:byte;

begin
writeln;
writeln;
writeln(' Numele fisierului : => '); read(nume);

assign(f,nume); reset(f);
writeln;
writeln;
writeln(' Numele fisierului de iesire :'); read(nume2);
assign(g,nume2); rewrite(g);
clrscr;
writeln;
writeln;
Writeln(' Suma minima : => '); read(smin);
writeln;
writeln(' Suma maxima : => '); read(smax);

repeat
suma:=0;
while not eoln(f) do
read(f,ch);
write(ch,' ');
suma:=suma+ch;
for suma:= smin to smax do
begin
write(ch,' ');
write(g,ch,' ');
end;
begin
readln(f);
end;
until eof(f);
readkey;
end.

 se comporta cam asa
imi cere sa scriu fisierul din care incarc
apoi sare peste fisierul al doilea total  nu zice nimik de el
imi cere suma minima si suma maxima
si parca ar vrea sa  lucreze  doar un blink al cursorului

trebuiesc facute ceva setari in FPC ?

[•blasterz]

Tu ti-ai testat codul pe un fisier mic ca sa vezi daca e din cauza ca e fisierul foarte mare?
Poate ai vreun bug in cod...
Eu nu stiu Pascal, deci nu te pot ajuta.

[•ionzlatan]

problema e in felul urmator
codul l-am testat si l-am re-testa de mi-a venit acru in gura

faza e  ca acest FPC pe 64  mi-a bulti codu' 
ce pot sa fac acum
nici unul din programelele pe care le scrisesem nu mai functioneaza
sa le rescriu din nou

mi-a luat o gramada
si eu abia ce am invatat  un pic de pascal  in aste 2 luni 

poate exista  o alta solutie
un alt compilator  de pasca pe 64
un borland sau un turbo de ex
  ceva idei

[•blasterz]

Nu FPC ti-a bulit codul... tu probabil ai scris cod nestandard...
in fine... nu stiu ce sa-ti zic... ideea ar fi ca cineva care lucreaza pe FPC
sa se uite peste codul tau...

[•PetcuIoan]

Editat de admin: Acesta este ultimul avertisment. La urmatoarea abatere vei primi ban.