1 read*,n;print'(f0.3)',6.28318*abs(n);goto1;end