DRINGEND!!! Befehl für die Divison

quantum · Hält's aus hier Beiträge: 1

Ich habe versucht einen Taschenrechner zu programmieren. Addieren, Subtrahieren, Multiplizieren funktioniert alles, aber bloß nicht die Division. Hier ist ein Ausschnitt des Quelltextes für die Addition:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

var
  Zahl1, Zahl2, ergebnis: integer;
begin
  Zahl1:=StrToInt(Edit1.Text);
  Zahl2:=StrToInt(Edit2.Text);
  ergebnis:=Zahl1+Zahl2;
  Label5.Caption:=IntToStr(ergebnis);
end;

Einfach das Pluszeichen durch das"/" ändern geht nicht, das kommt folgende Fehlermeldung:

Zitat:

[Fehler] rechner.pas(39): Inkompatible Typen: 'Integer' und 'Extended'

für diese Zeile

markieren

Delphi-Quelltext

1:	ergebnis:=Zahl1/Zahl2;

Kann mir BITTE Einer den Befehl für Division geben?

Moderiert von tommie-lie: Delphi- und Quote-Tags hinzugefügt

MSCH · Verfasst: So 23.11.03 16:34

tja die Division liefert keine ganzen Zahlen. Also musst du den Typ des Ergebnisses ändern.

markieren

Delphi-Quelltext

1:
2:
3:
4:

var Ergebnis: Double;
begin
  Ergebnis := 1234 / 43212;
end;

grez
msch

_________________
ist das politisch, wenn ich linksdrehenden Joghurt haben möchte?

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Und anschließend musst Du "IntToStr " durch "FloatToStr" ersetzen. Wenn Du eine ganzzahlige Division haben willst, dann nimm "div". Dann bekommst aber natürlich nur den ganzzahligen Anteil. 3 div 2 ist also 1.

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme