円運動のアニメーション

Animate[
x=Cos[t];
  y=Sin[t];

  waku=Circle[{0,0},1];
  ten=Disk[{x,y},0.05];

Graphics[{waku,ten},{ PlotRange->{{-1.2,1.2},{-1.2,1.2}}}],{t,0,2Pi,Pi/20},AnimationRunning->False
]