ďťż

Ładny brzuch

Na dole podałem procedure usuwająca element z kolejki odziwo jak robie w pentli while to usuwa wszystkie elementy ale jak zrobie to if-em tak jak teraz to nie działa (mam tylko jeden element typu kolejka czyli robiłem tylko raz new(nowy))

procedure usun(glowa,nowy:kolejka); begin   {usuwanie elementow}   if (glowa<>nil) then   begin   nowy:=glowa;   glowa:=glowa^.nast;   writeln('Usuwam z kolejki');   writeln(nowy^.wart);   end; end;




(...)

stary jesteś wielki , nie wiesz ile czasu nad tym siedziałem a tylko wystarczyło napisać var pozdrawiam i dziekuje.

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
  •