Imports System
Imports System.Text
Imports Microsoft.VisualBasic.Strings
Imports System.Numerics
Class MainClass
Public Shared Sub Main()
Dim number As BigInteger = BigInteger.Pow(Int64.MaxValue, 2)
Console.WriteLine(number)
Dim bytes() As Byte = number.ToByteArray()
For Each byteValue As Byte In bytes
Console.Write("0x{0:X2} ", byteValue)
Next
End Sub
End Class