Imports System Imports System.Text Imports Microsoft.VisualBasic.Strings Imports System.Numerics
Class MainClass Public Shared Sub Main()
Dim number As BigInteger = Int64.MaxValue ^ 5 Dim repetitions As Integer = 1000000
For ctr As Integer = 0 To repetitions
number += 1
Next End Sub End Class