[Pascal] Baza danych osobowych

aleksandra25 · Post autor: **aleksandra25** » 30 cze 2016, o 13:42

Napisz program w języku Pascal , który pobiera od użytkownika określoną przez niego liczbę rekordów danych osobowych (typu rekordowego) i umieszcza w pamięci (typ tablicowy). Następnie dane te powinny zostać posortowane wg jakiegoś klucza (np. wiek) i wyświetlić z tablicy całą, już posortowaną, zawartość bazy danych rekordów.

SlotaWoj · Post autor: **SlotaWoj** » 30 cze 2016, o 16:32

A jakąś metodę sortowania zaimplementować potrafi?

aleksandra25 · Post autor: **aleksandra25** » 30 cze 2016, o 18:52

Tak , np. bąbelkowe .

SlotaWoj · Post autor: **SlotaWoj** » 30 cze 2016, o 19:33

To opracuj odpowiednie typy i zakoduj procedurę:

Procedure SortujBaze ( var Baza : TypBazowy; LiczbaElementów : integer );

a później zadeklaruj zmienne globalne i napisz blok programu z wejściem, wywołaniem ww. procedury i wyjściem.

Edit: Drobne poprawki.

aleksandra25 · Post autor: **aleksandra25** » 30 cze 2016, o 19:38

Może jakiś kod czy coś , bo nie zrozumiałam .

SlotaWoj · Post autor: **SlotaWoj** » 1 lip 2016, o 01:01

A ruszyć głową to nie łaska?
Jeszcze raz przeczytaj mój post, bo wprowadziłem drobne poprawki.

Szkielet programu może być taki:

Kod: Zaznacz cały

Program  SortowanieBazy;

  type
     ...  { deklaracje typów, a w tym: }
     TypBazowy = array [1..100] of ... { itd. }

  var
     LiczbaRekordow : integer
     Baza           : TypBazowy;

  Procedure  WpowadzBaze ( var B : TypBazowy; LR : integer );
       ...
    end;  { WpowadzBaze }

  Procedure  WypiszBaze ( var B : TypBazowy; LR : integer );
       ...
    end;  { WypiszBaze }

  Procedure  SortujBaze ( var B : TypBazowy; LR : integer );
       ...
    end  { SortujBaze }

    begin  { SortowanieBazy }

      Write ('Liczba rekordów = ');  Realdn (LiczbaRekordow);
      WprowadzBaze (Baza,LiczbaRekordow);
      SortujBaze   (Baza,LiczbaRekordow);
      WypiszBaze   (Baza,LiczbaRekordow);

    end.  { SortowanieBazy }

W ostatniej chwili zmieniłem nazewnictwo parametrów w nagłówkach procedur (na B i LP), bo są one lokalne wewnątrz procedur i ich identyczne nazwy ze zmiennymi globalnymi może być mylące.

Oczywiście ww. program będzie bardzo niedoskonały, bo np. nie przewiduje wg którego klucza rekordu ma być realizowane sortowanie ani jaki ma być jego porządek (będzie to „zaszyte” w programie na stałe), ale jako program sprawdzający kwalifikacje po uproszczonym kursie programowania „może być”.