program main
    use, intrinsic :: iso_fortran_env
    implicit none
    real(real64) :: r, l
    real(real64), parameter :: pi = 4.0d0*atan(1.0d0)
    read*, r
    l = 2*pi*r
    print*, l
end program main
