gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control system--- a/skripta-spa1-sadrzaj.tex
+++ b/skripta-spa1-sadrzaj.tex
END DodajSort;
\end{lstlisting}
+Kod svih procedura se mogu primeniti i rekurzivne varijante. Sledi
+primer za kreiranje sortirane liste.
+
+\begin{codeblock}
+PROCEDURE DodajSortRek(VAR lista:brojevi; br:INTEGER);
+(* Koristi se cinjenica da prosledjujemo pokazivac
+po referenci, tj. da ga mozemo menjati unutar procedure *)
+VAR
+ temp : brojevi;
+BEGIN
+ IF (lista = NIL) OR (lista^.info>=br) THEN
+ (* Izlaz iz rekurzije. Ubacivanje u praznu listu,
+ na kraj liste ili na odgovarajuce mesto *)
+ NEW(temp);
+ temp^.info:=br;
+ temp^.veza:=lista;
+ lista:=temp;
+ ELSE
+ DodajSortRek(lista^.veza, br);
+ END;
+END DodajSortRek;
+\end{codeblock}
+
+\manbreakJK
+
\subsection{Zadatak: Prikaz osnovih operacija nad listama}
\begin{lstlisting}[style=codeblock]