X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=spa1skripta-public.git;a=blobdiff_plain;f=kodovi%2Fpolinomi%2FPOLINOML.DEF;fp=kodovi%2Fpolinomi%2FPOLINOML.DEF;h=e11f4cee832171a18281f12156bf58996117bc10;hp=5b50bc19d235da77f7d02b03e49e2ac8a65e86d1;hb=5032b8ef31be8b199297901b7fe1ec2c6dccea37;hpb=74eec3956c02c387de6afb0839d112544881cd3e diff --git a/kodovi/polinomi/POLINOML.DEF b/kodovi/polinomi/POLINOML.DEF index 5b50bc1..e11f4ce 100644 --- a/kodovi/polinomi/POLINOML.DEF +++ b/kodovi/polinomi/POLINOML.DEF @@ -1,5 +1,5 @@ (* Modul za rad sa polinomima preko listi - verzija 2012, rev 1 *) + verzija 2014 *) DEFINITION MODULE PolinomL; TYPE Polinom = POINTER TO Monom; @@ -14,6 +14,10 @@ PROCEDURE Unos(VAR p: Polinom); PROCEDURE Stampaj(p: Polinom; d: CARDINAL); PROCEDURE Kopiraj(p: Polinom; VAR kopija: Polinom); +PROCEDURE PostaviClan(k: REAL; st:CARDINAL; + VAR p:Polinom); +PROCEDURE KoeficijentUz(p:Polinom; st:CARDINAL):REAL; +PROCEDURE MaksimalniStepen(p:Polinom):CARDINAL; PROCEDURE UbaciMonom(mon:Polinom; VAR p: Polinom); PROCEDURE PromeniZnak(VAR p: Polinom);