Imports System

Class Sample
  Shared Sub Main()
    ' 以下の2つはどちらも同じ動作・同じ結果となる

    ' Consoleクラスのメソッドを使って標準入力から読み込む
    Dim line1 As String = Console.ReadLine()
    
    Dim num As Integer = Integer.Parse(line1) 
    
    Console.WriteLine(num * 3.14159 * 2)
  End Sub
End Class