Imports System

Imports System.Numerics

​

Public Class Program

​

    Public Shared Sub Main()

        Dim a As BigInteger = BigInteger.One

        For i = 1 To 104

            a *= BigInteger.Parse(i.ToString())

        Next

​

        a *= BigInteger.Parse("10")

        a /= BigInteger.Parse("3600")

        Console.Write(a)

    End Sub

End Class

​