gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control system 1 (* Modul za rad sa polinomima preko listi
2 verzija 2014 *)
10 BEGIN
15 VAR
17 BEGIN
20 ELSE
29 p := p^.veza
30 END
31 END
37 BEGIN
47 END
48 ELSE
50 END
51 END
54 BEGIN
57 ELSE
66 ELSE
70 p := p^.veza
71 END
72 END
77 VAR
79 BEGIN
94 ELSE
101 ELSE
104 ELSE
109 ELSE
121 VAR
123 BEGIN
131 tekuci := tekuci^.veza
135 p := kopija
136 ELSE
137 stari^.veza := kopija
145 p := kopija^.veza
146 ELSE
147 stari^.veza := kopija^.veza
150 END
151 END
152 END
156 VAR
159 BEGIN
161 REPEAT
162 WriteLn;
166 WriteLn;
170 REPEAT
175 WriteLn
177 REPEAT
178 WriteLn;
184 WriteLn;
188 END
192 BEGIN
196 p2 := p2^.veza
197 END
201 BEGIN
209 VAR
211 BEGIN
215 t := t^.veza
216 END
220 BEGIN
225 p1 := p1^.veza
226 END
230 VAR
232 BEGIN
245 p := p^.veza
248 END
252 VAR
254 BEGIN
261 REPEAT
263 pomocni := pomocni^.veza
265 p2 := p2^.veza
266 END
267 END
273 VAR
275 BEGIN
287 END
288 END
296 ELSE
299 END
304 VAR
306 BEGIN
314 ELSE
318 END
323 VAR
325 BEGIN
330 pomocni := p
331 END
334 END PolinomL.