REPORT ZCALC.
PARAMETERS Zahl1 TYPE i.
PARAMETERS plus RADIOBUTTON GROUP grp1.
PARAMETERS minus RADIOBUTTON GROUP grp1.
PARAMETERS mal RADIOBUTTON GROUP grp1.
PARAMETERS durch RADIOBUTTON GROUP grp1.
PARAMETERS Zahl2 TYPE i.
IF plus = 'X'. add Zahl2 to Zahl1.
WRITE : 'as Ergebnis der Addition lautet: ' , Zahl1.
ENDIF.
IF minus = 'X'. SUBTRACT Zahl2 FROM Zahl1. WRITE : 'as Ergebnis der Subtraktion lautet: ' , Zahl1.
ENDIF.
IF mal = 'X'. MULTIPLY Zahl2 by Zahl1. WRITE : 'as Ergebnis der Multiplikation lautet: ' , Zahl1.
ENDIF.
IF durch = 'X'. IF zahl2 = 0.
WRITE 'ivision durch 0 nicht möglich. Bitte nochmal versuchen!'.
ELSE.
DIVIDE Zahl1 by Zahl2.
WRITE : 'as Ergebnis der Division lautet: ' , Zahl1.
ENDIF.
ENDIF.
PARAMETERS auswahl TYPE ZCALC_OPERATOREN.
Copyright © 2024, NextGenUpdate.
All Rights Reserved.