前幾天管電腦軟硬體的同事(以下簡稱管理員)和我說: 管理員:你上次買的server沒有電腦編號耶 鳥毅:為什麼 管理員:你用簽呈買,沒有填電腦申請單 鳥毅:你不能直接新增一台設備嗎 管理員:可以呀,只是在申請單那欄會變成空白 鳥毅: ... 對於硬體管理的重點,應該在於數量清點確實,而不是每樣東西都有申請單。事實上,申請單的意義並不大,只是一筆記錄。由於管理程式的缺失及歷史的遺毒,這個no key系統資料亂七八糟,若真的要求那麼多,為何不花時間整理一下DB呢? 在1990年,那時鳥毅用的FORTRAN 77不支援recursive,FORTRAN 90才支援。某日在寫河內塔時 FORTRAN 77的寫法 INTEGER N WRITE (*,*) 'How many towers do you have ? ' READ *, N CALL HANOI(N) END SUBROUTINE HANOI(N) INTEGER N CALL MOVE(N,'peg1','peg2','peg3') RETURN END SUBROUTINE MOVE(N,FROM, AUX, TO) INTEGER N CHARACTER*4 FROM, AUX, TO IF(N .EQ. 1) THEN PRINT *,'Move disk 1 from ',FROM,' to ',TO ELSE CALL MOVE2(N-1,FROM, TO, AUX) PRINT 10, 'Move disk ',N,' from ',FROM,' to ',TO CALL MOVE2(N-1, AUX, FROM, TO) END IF 10 FORMAT (1X,A10,I2,A6,3A4) RETURN END SUBROUTINE MOVE2(N,FROM, AUX, TO) INTEGER N CHARACTER*4 F