Imports System
Public Module Module1
Public Sub Main()
Dim x as decimal
Dim y(16) as decimal
For x = 1 to 16
y(x) = Console.ReadLine()
Next
Console.Write(y(x))
If x mod 4 = 0 then
Console.Write(" ")
End If
End Sub
End Module