fibonacci sequence to 40 iterations

Module Module1
    Sub Main()
        Dim num1 As Integer
        Dim num2 As Integer
        Dim num3 As Integer
        num1 = 0
        num2 = 1
        For i = 0 To 40
            num3 = num1 + num2
            Console.WriteLine(i & ") " & num1 & " + " & num2 & " = " & num3)
            num1 = num2
            num2 = num3
        Next

        Console.ReadLine()
    End Sub
End Module

revision from test

Why should floating point numbers be stored in normalised form?
Less risk of rounding errors.

State two advantages of using a normalised representation.
It is more precise for the given number of bits.

A larger mantissa allows for a greater range of numbers.
A smaller exponent is less accurate.

12 days of christmas part two