Pascal program

[kn!fe]

Siema

Mam problem z programem pisze właśnie program książka telefoniczna i zawierajacy imie, miasto i numer tel. i mam problem z dodawaniem osób do książki. Program ma dodawać jedną osobe nast. powracac do menu, nastepnie mozemy dodac druga osobe w taki sposób aby nie nadpisać poprzedniego wpisu w tablicy. Nie działa mi dodawanie bez nadpisywania :/ Pomógł by mi ktoś to dopracować ?

Kod z programem wyśle po kontakcie na GG 7759472

[matshadow]

Nie znam sie na pascalu, ale proponuję zrobić strukture np struct imie i tablice
imie tablica[ile chcesz]. I po dodaniu osoby, zwiekszyc zmienna pomocnicza wskazujaca miejsce w tablicy o 1

[spajder]

w pascalu proponuję coś na wzór:

Kod: Zaznacz cały

type Osoba = record
   Imie : String;
   Nazwisko : String;
   { tu dalsza część typu}
end;

Kod: Zaznacz cały

type Ksiazka = object
   tablica : array[1..MAX_ILOSC] of Osoba;
   ilosc : Integer;

   procedure dodajOsobe;
end;

teraz przy wywoływaniu procedury dodajOsobe masz pełny dostęp do tabeli. Oczywiście możesz dać procedurę z jakimiś parametrami (imie, nazwisko czy nawet zmienną typu struct, ale raczej przekazywane za pomocą wskaźnika niż przez wartość)

[kn!fe]

Dzięki bardzo poradziłem sobie z tym jak by ktoś chciał to mogę udostępnić kod programu, pozdro