Pemrograman Desktop (Program Sederhana Faktorial)

Program Sederhana Faktorial

1. Script Program

Module Faktorial

    Function ft(N As Long) As Integer

        If (N > 1) Then

            Return N * ft(N - 1)

        Else

            Return 1

        End If

    End Function

    REM program utama

    Sub main()

        Console.WriteLine("Faktorial dari 7 adalah {0}", ft(7))

        Console.ReadLine()

    End Sub

End Module

2. Hasil Setelah Dijalankan