Taschenrechner BGY 20

Imports System.Console
Module Module1
    'Variablendeklaration
    Dim Zahl1 As Double 'Kommazahlen
    Dim Zahl2, Ergebnis As Double
    'Variablen des gleichen Datentyps
    'können mit Komma getrennt deklariert werden.
    Sub Main()
        'Eingabe mithilfe Read-Befehl
        'Merke: Bei der Eingabe steht die
        'Variable LINKS!
        Zahl1 = ReadLine()
        Zahl2 = ReadLine()
        'Verarbeitung
        Ergebnis = Zahl1 + Zahl2
        'Ausgabe
        WriteLine(Ergebnis)

        ReadLine() 'Hält das Ausgabefenster offen
    End Sub

End Module