- #1
76Ahmad
- 48
- 0
Hello every one, I wish i can some help in my mathematica programing.
I hane k <= 20, k is + integer.
n = 1/12(3(5 - 2Sqrt[6])^k)
what I need to do is for every value of n (comes from K ofcourse),
Print the minmum coefficient for (1 + x)^n
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
I tryed to do the following:
For[k = 0, k ≤ 20, k++,
For[n=1/12(3(5 - 2Sqrt[6])^k,n++
Print[Min[Coefficient[(1 + x)\)^n], x^i]], {i, 1, n}]]]
and i got nothing I know i did it wrong please help.
I hane k <= 20, k is + integer.
n = 1/12(3(5 - 2Sqrt[6])^k)
what I need to do is for every value of n (comes from K ofcourse),
Print the minmum coefficient for (1 + x)^n
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
I tryed to do the following:
For[k = 0, k ≤ 20, k++,
For[n=1/12(3(5 - 2Sqrt[6])^k,n++
Print[Min[Coefficient[(1 + x)\)^n], x^i]], {i, 1, n}]]]
and i got nothing I know i did it wrong please help.