' SubroutineTrace Example

' Construct the program trace table and predict the output.

Imports System.Console
Public Module Module1

    Public Sub Main()
        Dim a As Integer = 5

        F(a)
        F(a + 4)
        ReadLine()
    End Sub

    Public Sub F(ByVal n As Integer)
        Dim m As Integer = 3
        Dim s As Integer

        s = 2 * n + 3 * m
        WriteLine("$" & s & n & "$")
    End Sub

End Module