Taschenrechner Programmieren

**Excalibur**

Ich hab auch versucht nen Rechner zu proggen und hab ein Prob, deshalb greif ich den Thread mal auf....

Es soll ein Taschenrechner entstehen, bei dem man 2 Zahlen und das zu verwendende Rechenzeichen angeben können soll, wobei auch negative und , Zahlen möglich sein sollen.

markieren

Code:

			Var Zahl1, Zahl2, Rechenzeichen, Ergebnis: integer;

Begin

Zahl1:=strtoint(edit1.text);

Zahl2:=strtoint(edit2.text);

Rechenzeichen:=was muss ich hier nehmen(edit3.text);

If Rechenzeichen = '+'

 then Ergebnis :=Zahl1 + Zahl2;

If Rechenzeichen = '-'

 then Ergebnis := Zahl1 - Zahl2;

etc....

hier bekomm ich immer den Fehler: Ausdruck erwartet, aber then gefunden

Label5.caption:=inttostr(Ergebnis);

End.

Hat da jemand ne Fehlerlösung zu? (ich hab erst kürzlich mit Delphi angefangen, etwas Ahnung von TurboPascal und mir schon einige Tuts durchgelesen, hab aber nicht sooo ne große Ahnung von den Fachbegriffen)

Taschenrechner Programmieren

Re: Taschenrechner Programmieren

Forumregeln