Chce stworzyć tablice która będzie przechowywać n liczb. Liczby będą podawane od użytkownika, nie wiem ile ich będzie, dlatego chce stworzyć tablice która będzie rosnąć wraz z nowymi liczbami.
Mam coś takiego
begin
Writeln('Podaj liczby');
Writeln('Aby zakonczyc podawanie liczb wcisnij 0');
i:=0;
repeat
read(a);
if a=0 then
break;
i:=i+1;
SetLength(Tablica,i);
Tablica[i]:=a;
until(false);
Niestety, ten kod jest błędny z takiego powodu, że SetLenght mi nadpisuje całość starej tablicy. Jak mogę zrobić coś takiego?
Utworzyć kopię tablicy, zmienić rozmiar aktualnej i przekopiować stare wartości do nowej, tak łopatologicznie. Może jest elegantsze rozwiązanie, ale nie znam Pascala.
taki problem można rozwiązać korzystając z listy jedno kierunkowej. W razie problemów z napisaniem jej możesz zgłosić sie do mnie na PW lub gg 8407190 tylko odpisz się:)