Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Calc(X,Y,Z,op) :-
- if op is + -> Z=X+Y;
- if op is - -> Z=X-Y;
- if op is * -> Z=X*Y;
- if op is / -> Z=X/Y;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement