18/07/29 18:52:44.82 +pC2KYTE.net
Rで書いてみる。
hanoi <- function(n,from,via,to){
if(n>=1){
Recall(n-1,from,to,via)
cat('move',n,'from',from,' to ',to,'\n')
Recall(n-1,via,from,to)
}
}
hanoi(5,'ド底辺シリツ医大','イカサマ入試','裏口入学')
18/07/29 18:52:44.82 +pC2KYTE.net
Rで書いてみる。
hanoi <- function(n,from,via,to){
if(n>=1){
Recall(n-1,from,to,via)
cat('move',n,'from',from,' to ',to,'\n')
Recall(n-1,via,from,to)
}
}
hanoi(5,'ド底辺シリツ医大','イカサマ入試','裏口入学')