Dyskusja: Pascal...pytanie
Podgląd pojedynczego posta
Stary 09.12.2006, 22:22   #14
pawelblu
Recydywista - Wielokrotny
Zlotowicz
CDRinfo VIP
 
Avatar użytkownika pawelblu
 
Data rejestracji: 17.01.2003
Lokalizacja: Wawa
Posty: 5,265
pawelblu niedługo stanie się sławny ;) <50 - 149 pkt>pawelblu niedługo stanie się sławny ;) <50 - 149 pkt>
Cytat:
Napisany przez Patrix Podgląd Wiadomości
no tak, może teraz liczba wchodzi do listy ale jakoś nie umiem jej wyświetlić, pisałem nawet procedure aby ja znaleźć ale chyba jej tam nie ma

Kod:
{-----------------------------------------------------}
procedure szukaj;
var liczba: integer;
  begin
    temp := lista;

    writeln('Podaj szukana liczbe');  readln(liczba);

    while temp <> nil do
      begin
        if liczba = temp^.dana then writeln('Znaleziono');
        temp := temp^.poprzednia;
      end;

  end;
{-----------------------------------------------------}
może mam zły pomysł na procedury ?

Nigdy nie sprawdzasz najstarszego elementu.
czyli tego co mam poprz=nil
pawelblu jest offline   Odpowiedz cytując ten post