Slide 17
Slide 17 text
yokan言語でFizzBuzzを実装してみた!
remainder=(n,d){n-(n/d)*d}
fizzbuzzii=(n){
if(
remainder(n,15)==0,
(){puts("fizzbuzz\n")},
(){
if(
remainder(n,3)==0,
(){puts("fizz\n")},
(){
if(
remainder(n,5)==0,
(){puts("buzz\n")},
(){puts(n)}
)()
}
)()
}
)()
}
fizzbuzzi=(max,n){
fizzbuzzii(n)
if(
max>n,
(){fizzbuzzi(max,n+1)},
(){}
)()
}
fizzbuzz=(max){
fizzbuzzi(max,1)
}
fizzbuzz(15)
(改行はうまく読み込めないので、動かすには改行を取り除く必要があります。)