let divrem dividend divisor =
let quotient = dividend / divisor in
quotient, dividend - quotient * divisor
let q, r = divrem 42 5 in
printfn "42 = %d * 5 + %d" q r
bGV0IGRpdnJlbSBkaXZpZGVuZCBkaXZpc29yID0KICBsZXQgcXVvdGllbnQgPSBkaXZpZGVuZCAvIGRpdmlzb3IgaW4KICBxdW90aWVudCwgZGl2aWRlbmQgLSBxdW90aWVudCAqIGRpdmlzb3IKCmxldCBxLCByID0gZGl2cmVtIDQyIDUgaW4KcHJpbnRmbiAiNDIgPSAlZCAqIDUgKyAlZCIgcSBy