integer durch "2" teilen?!

[trip]

Code: Alles auswählen

Program rofl;
 
var
  test, ergebnis : integer;
 
begin
     test := 40;
     ergebnis := test/2;
     writeln('Ergebnis: ', ergebnis);
end.

Warum kriege ich hier folgenden Compilerfehler?

Error: INcompatible types: got "Extended" expected "SmallInt"

Also hier gibt es wohl einen Typenkonflikt - das ist mir schon klar. Die 2 ist wohl "Extended" anstatt Integer...

Wie kann man denn eine Integer-"2" schreiben?!

[Eb]

Code: Alles auswählen

ergebnis := test DIV 2;

[trip]

thx!

[MAC]

nein da liegt ein denkfehler dahinter...
Die 2 ist genauso integer wie die 40 auch. Aber beim Teiler kommt eine Gleitkommazahl raus. der Computer könnte ka auch 39 / 2 rechnen, da würde 19,5 rauskommen. Das ergebnis hat ein komma un ist deswegen Extendet. kann also nicht in einer integer variable gespeichert werden. also müsste entweder ergebnis vom typ "real" sein oder du schreibt

Code: Alles auswählen

ergebnis = round(test/2)

Der Tipp von Eb ist aber der beste weil es technisch sauber ist...
Ich wollte nur nochmal die logig dahinter erklären...

[trip]

Dass es nicht an der Schreibweise der Zahl (hier "2") sondern dem mathematischen Operator "/" lag, hatte sich mir schon erschlossen. Danke.

[Euklid]

Wenn Du jetzt den "Rest" der Division wissen willst, kannst Du

Code: Alles auswählen

rest := test mod 2;

schreiben.

- Euklid

[HOffen]

Ganzzahlige Division durch Potenzen von 2 sind am effektivsten mit shr durchzuführen:

Code: Alles auswählen

// Beispiele
x div 2  = x shr 1
x div 4  = x shr 2
x div 8  = x shr 3
x div 16 = x shr 4
// usw.

Analog dazu funktioniert die Multiplikation mit Potenzen von 2 als Bit-Shift-Left (shl):

Code: Alles auswählen

// Beispiele
x * 2  = x shl 1
x * 4  = x shl 2
x * 8  = x shl 3
x * 16 = x shl 4
// usw.

[m.fuchs]

Ganzzahlige Division durch Potenzen von 2 sind am effektivsten mit shr durchzuführen:

Was bedeutet in diesem Fall "am effektivsten"?
Geschwindigkeitsvorteile? Bessere Lesbarkeit? Etwas anderes?

[Socke]

Was bedeutet in diesem Fall "am effektivsten"?
Geschwindigkeitsvorteile? Bessere Lesbarkeit? Etwas anderes?

Der Prozessor muss hier nicht wirklich rechnen sondern lediglich die Bits nach Links oder Rechts verschieben. Das wirkt sich in der Regel aber nur bei sehr vielen Berechnungen aus. Und weil die Programmierer des Free Pascal Compilers das auch wissen, haben die das direkt eingebaut. (vgl. http://www.freepascal.org/docs-html/pro ... 200011.1.8)

[m.fuchs]

Das hab ich mir schon fast gedacht, als mein Testprogramm keine zeitlichen Unterschiede zwischen div und shr feststellen konnte (bei ein paar Millionen Berechnungen jeweils). Und dann ist natürlich ganz klar div zu bevorzugen, wegen der besseren Lesbarkeit des Quelltextes.

[mse]

Zur Illustration:

Code: Alles auswählen

var
 a,b: longword;
begin 
 a:= b div 2;
 a:= b shr 2;
end.

Mit Vorzeichen:

Code: Alles auswählen

var
 a,b: integer;
begin 
 a:= b div 2;
 a:= b shr 2;
end.

Achtung, shr bringt für negative Zahlen nicht das gewünschte Resultat!

Martin