Witam.
Pytanie jak w temacie.Tworzę tablicę dynamiczną za pomocą:
Program P1;
Uses crt;
Type
Vec=array of real;
Var
A,B:Vec;
i,n,e:byte;
x:string;
Procedure Wczytaj(AA,BB:vec;xx:string;nn,ee:byte);
Begin
Repeat
Writeln('Podaj ile liczb ma wczytac');
Readln(xx);
val(xx,nn,ee);
Until(ee=0);
SetLength(AA,nn); {Przypisuje indeksowi początkowemu 0 a chciałbym 1 czy jest taka możliwość}
SetLength(BB,nn);
Clrscr;
For i:=0 to nn-1 do {I w tym miejscu musze przypisać i 0 do nn-1 a chciałbym żeby było od i:=1 to nn lecz wtedy wyskoczy błąd sigsegv bo tablica będzie przeładowana}
Begin
Write('Podaj A[',i,']:');
Readln(AA[i]);
End;
Z góry dziękuję za wszelką pomoc.
poprawienie znaczników <code class="pascal"> - fp