繼續Perl學習 遞迴

標籤：原始碼   統計   

有一段時間學習PYTHON，很傷心啊，版本太新，好多東西用起來不方便。

還是繼續用我的小***perl吧，我相信perl會解決掉我遇到的大部分問題！

一、統計隨機數出現頻次

--原始碼

650) this.width=650;" src="http://s3.51cto.com/wyfs02/M02/73/FF/wKioL1YMGt7C-ROKAAGrEvCeMfo297.jpg" title="2015-10-01_012346.png" alt="wKioL1YMGt7C-ROKAAGrEvCeMfo297.jpg" />

--- 結果顯示

650) this.width=650;" src="http://s3.51cto.com/wyfs02/M00/74/02/wKiom1YMGwvwulvdAACJPNhc3c4487.jpg" title="2015-10-01_012518.png" alt="wKiom1YMGwvwulvdAACJPNhc3c4487.jpg" />

二、遞迴應用，階乘演算法

--代碼

650) this.width=650;" src="http://s3.51cto.com/wyfs02/M00/73/FF/wKioL1YMG1XRAd2qAAC-pnYHqqQ486.jpg" title="2015-10-01_012621.png" alt="wKioL1YMG1XRAd2qAAC-pnYHqqQ486.jpg" />

-- 結果

650) this.width=650;" src="http://s3.51cto.com/wyfs02/M01/74/02/wKiom1YMG3HSauHGAAEJwIoZdnM853.jpg" title="2015-10-01_012702.png" alt="wKiom1YMG3HSauHGAAEJwIoZdnM853.jpg" />

本文出自 “奮鬥成就卓越” 部落格，請務必保留此出處http://tiger506.blog.51cto.com/318536/1699705

繼續Perl學習 遞迴