Put[TeXForm[Expand[(x+y)^10]],"mathexp.tex"]