Delphi Taschenrechner

[bayer]

weil du nicht meinen Code da reingenommen hast

   '/':
    begin
        if b <> 0 then
        ergebnis := a / b
    else

Schau dir das mal genau an Der Lerneffekt wird sich dann sicher stark bemerkbar machen, was die Syntax der Case of-Bedingung angeht.

Ausserdem musst du die Variable, die bei mir ergebnis heisst, in deine Ergebnis-beimhaltende Variable umbenennen