I. 基礎部分 (統計計算，參考EXCEL)

1. 寫一函數，能夠將傳入的序列(SRC)資料再複製一份到DST
   procedure COPYARRAY(SRC:array of double;var Dst:array of double;N:Integer);
   //N為使用者指定的個數例如SRC[0 .. 50] 若N＝30 則Dst = Src [0..30]
2. 寫一函數，能夠將傳入的陣列填滿均勻亂數
   ex. procedure UniformArray(var v:array of double);
3. 寫一函數，將傳入的陣列填入random walk process
   ex. X [0..49] 令X(0) = 某個常數 i=1 to 48, x(i 1) = x(i) Normal(0,1)
4. 寫一函數，能夠將傳入的陣列填滿常態分配
   ex. procedure GaussArray(var v:array of double);
5. 寫一函數，求得傳入序列的平均值
   function Average(v:array of double):Double;
6. 寫一函數，求得傳入序列的變異數
   function Variance(v:array of double):Double;
7. 寫一函數，求得傳入序列的標準差
8. 寫一函數能夠畫出傳入序列的histogram，需能指定bin數目
9. 寫一函數,求兩個序列的covariance
   function Cov(v1,v2:array of double):Double;
   
10. 寫一函數，求lag
    procedure Lag(Src:array of double;var Dst:array of Double, NLag:Integer);
    說明: 使用者傳入一陣列SRC[0..50]，這個函數傳回SRC的lag(=NLag) 期序列 ，即SRC[NLag .. 50]
11. 寫一函數，求傳入序列的percentile

II. 輸入部分

1. a)利用EXCEL產生亂數資料50個，共三欄，第一欄(x1)常數2，第二欄(x2)資料uniform0~1，第三欄資料y = x1 3*x2 normal(0,1) (0)
   b) 存成文字檔c:\temp\data.txt (0)
   c) 將三個欄位的資料列印到MEMO
   

III.輸出部分 (b,c,d需利用你自己地I部分的基礎函數)
a) 利用Delphi產生亂數資料50個，共三欄，第一欄(x1)常數2，第二欄(x2)資料uniform0~1，第三欄資料y = x1 3*x2 normal(0,1)
b) 將 X2,Y 分別畫出histogram
c) 輸出 X2,Y  為scatter plot (x2 為X座標，Y為Y座標，畫到圖上共50個點)
d) 每個欄位的平均、變異樹、標準差，
IV 分析資料

a)解迴歸 將結果（常數項和 X2的係數) 輸出到 Memo，例如
  常數項：2
  X2係數： 3
b) 求欄位X2的autoconvarance
c) 將結果輸出檔案c:\temp\result.txt

http://delphi.ktop.com.tw/board.php?cid=32&fid=107&tid=58991

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！