Program Rechner; //Kleines Rechnerprogramm für die vier Grundrechenarten +, -, *, / var dZahl1, dZahl2 : Real; cRechenArt : Char; begin write('Wie lautet die erste Zahl?: '); readln(dZahl1); write('Wie lautet die zweite Zahl?: '); readln(dZahl2); write('Wählen Sie eine Rechenoperation aus ("+" oder "-" oder "*" oder "/")'); readln(cRechenArt); writeln('Das Ergebnis lautet: '); if cRechenArt = '+' then writeln(dZahl1 + dZahl2:6:2) else if cRechenart = '-' then writeln (dZahl1 - dzahl2:6:2) else if cRechenart = '*' then writeln (dZahl1 * dzahl2:6:2) else if cRechenart = '/' then writeln (dZahl1 / dZahl2:6:2); end.