做測試也有將近兩年了吧,平常的時間都被那些忙不玩工作給佔據了,呵呵,靜下心來後,感覺自己還是要學點東西,只是工作的機器可不行啊。 Tcl語言,平常工作接觸一點點,公司有個牛人用這在用,用處還真大。於是自己也開始學吧,對程式設計還是有點點興趣的,哈哈。
如何學習?光看書不行啊,還是以練促學吧,用for循環和while循環寫了一個從1加到100的小程序,別看簡單,還花了不少精力,先前不通,不是這錯就是那錯。慢慢來吧,呵呵,給自己加油!
for {set i 1;set j 0} {$i<=100} {incr i 1} {
set j [expr ($j+$i)]
} ; return $j ;
set i 1
set j 0
while {$i<=100} {
set j [expr ($ j+$i)]
set i [expr ($i+1)]
} ; return $j ;
自己感覺,學習一樣新東西,剛開始是耐心,然後是恆心吧,呵呵,因為剛開始容易急,而後來就容易放棄。 。 。
[creat by liweikui, May 6,2009]
以上是Tcl小程式從1加到100的實例代碼的詳細內容。更多資訊請關注PHP中文網其他相關文章!