RosettaCodeData/Task/Mutual-recursion/Kotlin/mutual-recursion.kotlin
2017-09-25 22:28:19 +02:00

27 lines
511 B
Text

// version 1.0.6
fun f(n: Int): Int =
when {
n == 0 -> 1
else -> n - m(f(n - 1))
}
fun m(n: Int): Int =
when {
n == 0 -> 0
else -> n - f(m(n - 1))
}
fun main(args: Array<String>) {
val n = 24
print("n :")
for (i in 0..n) print("%3d".format(i))
println()
println("-".repeat(78))
print("F :")
for (i in 0..24) print("%3d".format(f(i)))
println()
print("M :")
for (i in 0..24) print("%3d".format(m(i)))
println()
}