Tính n! sử dụng vòng lặp For
Code:
GiaiThua[n_] := Module[{temp},
For[i = 1; temp = 1, i ≤ n, i++, temp = temp*i];
Return[temp];
]
n = Input[];
GiaiThua[n]
Vòng lặp ForWed Mar 03, 2010 10:00 pmCode:
GiaiThua[n_] := Module[{temp},
For[i = 1; temp = 1, i ≤ n, i++, temp = temp*i];
Return[temp];
]
n = Input[];
GiaiThua[n]|
|
|