Table[{n,FourierCosCoefficient[Exp[Cos[t]], t, n]}, {n, 0, 5}]