Cvičení 7 (ze dne 28. 11. 2002):

Napsali jsme si program pro řešení soustavy lineárních rovnic Gaussovou eliminací.
CV7Gauss.pas

Na začátku příštího cviční si řekneme ještě jednu poznámku o potřebě tzv. pivotizace
v algoritmu Gaussově eliminaci. Program pro řešení soustavy s provedením pivotizace je zde
CV7Pgaus.pas

Dále jsme si tošku hráli s typy definovanými výčtem a pracovali s vektory ve 3D prostoru.
Zde uvádím program, který definuje množinu vektorů jejichž koncové body tvoří čtyřstěn.
Definice se provádí v soustavě souřadnic, kde se čtyřstěn dobře zadává. Poté se množina
bodů otočí tak, aby jeden z vrcholů a těžiště ležely na ose z a spočte se moment setrvačnosti
kolem této osy.
CV7Vektor.pas


Zpět, Domů