Zitat von
TonyR:
Aber ich hoffe du verstehst meine Vorgehensweise hier:
Delphi-Quellcode:
procedure kurzen(Ausgangsbruch, Ergebnisbruch: Tbruch);
begin
Ergebnisbruch.zahler:=Round(Ausgangsbruch.zahler div ggt(Ausgangsbruch.zahler,Ausgangsbruch.nenner));
Ergebnisbruch.nenner:=Round(Ausgangsbruch.nenner div ggt(Ausgangsbruch.zahler,Ausgangsbruch.nenner));
end;
So geht das nämlich => dürfte ja selbsterklärend sein
Und jetzt kannst du deine eigene Prozedur mit deinen 100 Variablen schreiben, oder nicht?
ja ist es
war irgendwie grade neben mir
aber da kommt mir ein neues problem in denn Sinn...Wie kann ich die ganzzahl anzeigen lassen? ist das dann nicht
ganzezahl:= ???? div ???
ICh hoffe du verstehst mein Problem
