Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
12. Nov 2007
Sonst ist alles in Ordnung ja? Komm mal runter Junge... :roll:
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
11. Nov 2007
Naja aber ich glaube ich kann dir sagen das du die Aufgabe bis morgen nicht fertig bekommst wenn du an dem Teil hängst. herauszufinden ob zwei Preise ein Pärchen bilden ist das geringste Problem der Aufgabe. Und auch das einfachste... Und ich wäre dir auch dankbar, das wenn du deine Aufgaben noch abschicken willst nicht meinen Quelltext so übernimmst. Ich hab ihn mal gepostet weil ich dir keine...
Forum: Object-Pascal / Delphi-Language
Delphi
by Neutral General,
11. Nov 2007
Hi,
Ich habs so gemacht. Also so ähnlich wie es schon gesagt wurde.
function Nachkomma(R: Single): Integer;
begin
Result := Round(R*100 - Floor(R)*100);
end;
function IsPair(x1,x2: Single): Boolean;