r=fi; ParametricPlot[{r*Cos[fi],r*Sin[fi]},{fi,0,2*Pi}];
