用遞迴解一些小問題
其實是想到以前練習 c 的時候寫過的問題
來用 Perl 練習看看
果然方便很多
雖然觀念都差不多
但是 Perl function 在傳 parameter 的時候
用的是 @_ 沒有數量限制實在很方便 (y)
利用這一點在進行一些遞迴的時候是很愉快的
有興趣的話可以看看下面這兩個段 code, 在 WinXP 和 Linux 上都可以直接跑 ~
連結在此 http://vision.twbbs.org/~crazier/r.rar 裡面有兩個檔案
combination.pl
這是用來做跑出所有數字排列組合的,
也就是說, 輸入 3 的話, 會出現 012 021 120 102 210 201 的結果
依此類推 不過輸入太大的話保證跑不完阿 XD
queens.pl
這個比較有趣了, 是典故已久的 8個皇后 問題
要在棋盤上放互相攻擊不到的皇后棋子
有 GUI, Undo, 顯示你的局面剩餘的可能解答等功能, 也可以直接看答案
基本上幾個皇后解法都一樣, 所以選項做到可以挑戰 10 個皇后
因為再上去就算不太動了 所以就算了 Orz
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.216.192.219
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章