Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
22. Nov 2015
Hab auch nochmal darüber nachgedacht. Ja, wir lösen hier numerisch ein Integral (mit Cotes 2). Deshalb muß es auch Value := H / N * (I - 0.5) heißen. Hab auch mal Vergleichsrechnungen mit dem Polyederprogramm geführt (War das ein Akt, das System zu modellieren). Ist so wie wir vermutet haben, der Schwerpunkt im Grundriß ändert sich NICHT durch die Höhe (Siehe Anlage, Durchmesser = 5,...
Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
20. Nov 2015
Das ist sicherlich eine gute Näherung. Damit wäre dann mit 2 / 3 * Segmenthöhe zu rechnen.
Dann habe ich dein P.S. von oben falsch verstanden. Sorry. Klar ist ja auch, wenn man jemanden für nicht glaubwürdig hält, machen dessen Aussagen natürlich wenig Sinn für einen. ("Die Beziehungsebene ist der Sachebene vorgeordnet", Paul Watzlawick).
Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
20. Nov 2015
Kein Stress (Und vor allem No Panic. Z.B. Jürgen Todenhöfer hat bezüglich IS einige gute Vorschläge gemacht, auf die bis jetzt aber leider niemand hört.)...
Die Idee war, den Zylinder entlang der Zylinderhöhe in Streifen zu teilen und die Ergebnisse der Streifen aufzusummieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
20. Nov 2015
M.E. ist der Schwerpunkt in X Richtung nicht abhängig von der Höhe? H soll hier die Segmenthöhe bedeuten (Siehe Link). Ich kann mich aber auch irren. :cyclops:
Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
20. Nov 2015
Hallo Jens, schön daß du dabei bist. Hab dich letztens vermisst. Das hier brauch ich nämlich für runde Querschnitte (statt Polyeder). Hab mir mal eben das aus den Rippen geleiert. Sollte doch richtig sein?
function CylinderSectionCenterX(const D, H: double): double;
const
N = 1000;
var
I: integer;
Value, Alpha, R, A, S, xS, SumM, SumA: double;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by Bjoerk,
20. Nov 2015
Moin Community. Weiß jemand wie man den Schwerpunkt eines solchen Dingens berechnen könnte (ohne ein Integral zu lösen)? Hab auf die Schelle nichts gefunden.