Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- grade(distinction, Mark) :-
- Mark >= 70.
- grade(pass, Mark) :-
- Mark >= 40,
- Mark < 70.
- grade(fail, Mark) :-
- Mark < 39.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement