a guest Oct 15th, 2019 75 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- let rec cmmdc (a, b) =
- if b = 0 then a
- else cmmdc(b, a mod b);;
- cmmdc (6, 28);; (* exemplu *)
RAW Paste Data