Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- silnia(0,1):-!.
- silnia(1,1):-!.
- silnia(X,W) :-
- X1 is X-1,
- silnia(X1,W1),
- W is W1*X.
- symbol_newtona(L1,L2,LW) :- L1>=L2,
- silnia(L1,LW1), silnia(L2,LW2),
- L3 is L1-L2,
- silnia(L3,LW3),
- LW is LW1/(LW2*LW3).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement