AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Schwerpunkt ZylinderAbschnitt

Ein Thema von Bjoerk · begonnen am 20. Nov 2015 · letzter Beitrag vom 22. Nov 2015
Antwort Antwort
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#1

Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 09:51
Delphi-Version: 2007
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.
Angehängte Dateien
Dateityp: pdf ZylinderAbschnitt.pdf (115,8 KB, 31x aufgerufen)
  Mit Zitat antworten Zitat
Jens01

Registriert seit: 14. Apr 2009
673 Beiträge
 
#2

AW: Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 12:52
Nur auf die schnelle gegooglelt: Schwerpunkt des Kreisabschnitts: (ungefähr) 2xb/5 (das kenne ich noch von der Vermessung). Bei der Höhe 1/3 ?
Hmm, verschiebt sich der SP horizontal noch durch die Höhe?

Ja (glaub ich), das kann man dann über verhältnisrechnung verschieben, oder?
Achtung: Bin kein Informatiker sondern komme vom Bau.

Geändert von Jens01 (20. Nov 2015 um 13:18 Uhr)
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 13:19
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?

Delphi-Quellcode:
function CylinderSectionCenterX(const D, H: double): double;
const
  N = 1000;
var
  I: integer;
  Value, Alpha, R, A, S, xS, SumM, SumA: double;
begin
  Result := 0;
  if (CompareValue(H, 0) > 0) and (CompareValue(H, D) <= 0) then
  begin
    SumM := 0;
    SumA := 0;
    R := D / 2;
    for I := 1 to N do
    begin
      Value := H / N * I;
      Alpha := 2 * ArcCos(1 - Value / R);
      S := D * Sin(Alpha / 2);
      A := R * R / 2 * (Alpha - Sin(Alpha));
      xS := R - S * S * S / 12 / A; // Von oben;
      SumA := SumA + A;
      SumM := SumM + A * xS;
    end;
    Result := SumM / SumA;
  end;
end;
https://de.m.wikipedia.org/wiki/Kreissegment

Geändert von Bjoerk (20. Nov 2015 um 13:21 Uhr) Grund: Link
  Mit Zitat antworten Zitat
Jens01

Registriert seit: 14. Apr 2009
673 Beiträge
 
#4

AW: Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 13:28
Zitat:
Sollte doch richtig sein?
Booh, Du fragst Sachen.
Modell bauen und ausprobieren.

https://upload.wikimedia.org/wikiped...roid_1.svg.png Bitte Skizze gucken
SP des Grundrisses sollte klar sein. In der Höhe müßte nach dem Prinzip verschoben werden!(?)
Achtung: Bin kein Informatiker sondern komme vom Bau.
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 14:06
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.
  Mit Zitat antworten Zitat
Jens01

Registriert seit: 14. Apr 2009
673 Beiträge
 
#6

AW: Schwerpunkt ZylinderAbschnitt

  Alt 20. Nov 2015, 14:24
Ich glaube der SP (X,Y) ist nur unabhängig von H bei einfachen Kegeln, Pyramiden usw. (oder doch nicht? ich weiss auch nicht...)

Sorry, den Code habe ich für mich noch nicht ganz erschlossen. Ich muss auch gleich hier in die Stadt (in ein Kaufhaus), wohne in der Nähe von Hannover...
P.S.: Ich habe allerdings den längsten Bart hier in der Gegend
Achtung: Bin kein Informatiker sondern komme vom Bau.

Geändert von Jens01 (20. Nov 2015 um 14:31 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:39 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz