Ja,ich hab den Kürzenvorschlag:
{kürzen}
For I := Min(Abs(ez), Abs(en)) downto 2 do
If (ez mod I2 = 0) and (en mod I2 = 0) Then Begin
ez := ez div I2;
en := en div I2;
Break;
End;
von "himinitsu" bei meiner Prozedur eingegeben,damit er mir den Bruch im Ergbebnisfeld kürzt,doch es tritt folgender Fehler auf:
Decleration expected , but “FOR “ found
ich weiß net mehr weiter,und was steht eigentlich für MIN? , Abs? downto? I bzw I2 & Break??
also diese fassung zum Programmieren von Kürzen von Bruchen,hackt
HILFE...!