proc divmod(a, b: int; res, remainder: var int) =
  res = a div b        # 整数型の除算
  remainder = a mod b  # 整数型のmod計算

var
  x, y: int
divmod(8, 5, x, y) # xとyを変更する
echo x
echo y