Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: 4-Eck-Typ herausfinden

  Alt 20. Dez 2002, 19:58
Code:
wenn auch wirklich 4-Eck [Winkelsummensatz] {
 wenn (Seiten a und c parallel) oder (Seiten b und d parallel) [Wechselwinkelsatz] {
  zumindest ein Trapez
  wenn (Seiten a und c parallel) und (Seiten b und d parallel) [WeWiSa] {
   zumindest ein Parallelogramm
   wenn (Seiten a und c gleichlang) [color=#ff0022]oder [/color] -> [color=#2200ff]und [/color](Seiten b und d gleichlang) [color=#1900ff]und (rechter Winkel zwischen Seite ab und bc)[/color] {
    zumindest ein Rechteck
    wenn (Seiten a und b gleichlang) [color=#f60000]und (Seiten c und d gleichlang)[/color] {
     Quadrat
    }
   }
  }
 }
}
Rot weg, blau dazu und die Lösung Du hast im Nu'
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat