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
3 DEFINITION MODULE PolinomL
;
5 Polinom
= POINTER TO Monom
;
12 PROCEDURE Anuliraj(VAR p
: Polinom
);
13 PROCEDURE Unos(VAR p
: Polinom
);
14 PROCEDURE Stampaj(p
: Polinom
; d
: CARDINAL);
15 PROCEDURE Kopiraj(p
: Polinom
;
17 PROCEDURE PostaviClan(k
: REAL; st
:CARDINAL;
19 PROCEDURE KoeficijentUz(p
:Polinom
; st
:CARDINAL):REAL;
20 PROCEDURE MaksimalniStepen(p
:Polinom
):CARDINAL;
21 PROCEDURE UbaciMonom(mon
:Polinom
;
23 PROCEDURE PromeniZnak(VAR p
: Polinom
);
24 PROCEDURE Saberi(p1
, p2
: Polinom
;
26 PROCEDURE SaberiNa(p
: Polinom
; VAR rez
: Polinom
);
27 PROCEDURE Oduzmi(p1
,p2
: Polinom
;
28 VAR razlika
: Polinom
);
29 PROCEDURE MonomPuta(p
, mon
: Polinom
;
31 PROCEDURE Puta(p1
, p2
: Polinom
; VAR pr
: Polinom
);
32 PROCEDURE Kolicnik(p1
, p2
: Polinom
;
33 VAR kol
, ost
: Polinom
;
35 PROCEDURE PolinomNaN(p
: Polinom
; n
: CARDINAL;
37 PROCEDURE DisposePolinom(VAR p
: Polinom
);
Svarog.pmf.uns.ac.rs/gitweb
maintanance
Doni Pracner