Division ohne Runden

Computer: Software & Programmierung Delphi & Pascal
1

Hallo,
ich soll für die Schule einen kleinen Rechner in Delphi schreiben (nur zur division)
nun habe ich folgenden Code:

var
 zahl1, zahl2, ergebnis: integer;
begin
 zahl1:=StrToInt(Edit1.Text);
 zahl2:=StrToInt(Edit2.Text);
 ergebnis:=zahl1 div zahl2;
 Label5.Caption:=IntToStr(ergebnis);
end;

Nun gibt mir Delphi aber ein auf null Nachkommastellen gerundetes Ergebnis. Wie kann ich Delphi nun sagen, dass es mir das Ergebnis mit 2/3/… Nachkommastellen geben soll?
Danke im Voraus
theking

2

Hallo theking095,

ich soll für die Schule einen kleinen Rechner in Delphi
schreiben (nur zur division)

var
zahl1, zahl2, ergebnis: integer;
begin
zahl1:=StrToInt(Edit1.Text);
zahl2:=StrToInt(Edit2.Text);
ergebnis:=zahl1 div zahl2;
Label5.Caption:=IntToStr(ergebnis);
end;

Nun gibt mir Delphi aber ein auf null Nachkommastellen
gerundetes Ergebnis. Wie kann ich Delphi nun sagen, dass es
mir das Ergebnis mit 2/3/… Nachkommastellen geben soll?

div ist die Integer-Division. Die gibt nie Nachkommastellen aus. Wenn Du Nachkommastellen möchtest, solltest Du den Operator / und real-Zahlen nehmen.

Viele Grüße
Marvin

3

währe es nicht besser mit gleitkommazahlen zu arbeiten? also anstatt integer z.B. Double.