|
|
Meine Frage:
Sub aufgabe6()
MsgBox "Ergebnis: " & berechne (6)
End Sub
Function berechne(n As Long) As Long
If n <= 1 Then
berechne = 1
Else
berechne = n * berechne(n - 1)
End If
End Function
Meine Ideen:
Frage a) Welche Ausgabe liefert das Programm "aufgabe6" ?
|
|
