for(i,0,-1+n:=File standardInput readLine asNumber,writeln(((a:=i*6.2832/n)cos*1e3)round," ",(a sin*1e3)round))