题目内容：

mathematica微分方程,数值解,
result = NDSolve[{
y''[t] + 0.1 y'[t] == -Sin[y[t]],y[0] == 1,y'[0] == 0},y,{t,0,50}]
Plot[y[x] /.result,{x,0,30}];
想知道y[1]的值,即x=1时,y是多少,如何在mathematica里面表示?