Předložený studijní materiál slouží jako základní studijní materiál distanční formy
studia předmětu Elektrotechnika 2, který navazuje na předmět Elektrotechnika 1 a spolu s ním
vytváří nezbytně nutné teoretické základy společné pro všechny elektrotechnické obory, které
jsou potřebné pro studium předmětů specializací v dalších ročnících studia.
Autor: Doc. Ing. Jiří Sedláček, CSc. Prof. Ing. Juraj Valsa, CSc.
Strana 178 z 186
Vámi hledaný text obsahuje tato stránku dokumentu který není autorem určen k veřejnému šíření.
2, -8. Jde jednoduché programy jazyku PASCAL, které nejsou náročné na
rozsah paměti počítače nekladou přílišné nároky použitou verzi překladače.
Příloha Řešení soustavy lineárních rovnic reálnými koeficienty
metodou Gaussovy eliminace
Program určen např.P..1-1. Jako příklad jsou programu uvedena
data, odpovídající jednoduchému můstku, popsanému rovnicemi smyčkových proudů.7, 8.
Schéma obr.7, 10),
(-8. Vstupní data
jsou všech případech zadávána formě konstant začátku programu.3; 3k, *)
(-13..n,1..7+10*(1-m), 0),
U=10V0
Re
Re
Ra
Ra 4,5 kΩ
Obr P.2, 23. Hodnoty odporů Ra, jsou pevné, odpory jsou části
potenciometru celkovém odporu kΩ.3).7+10*(1-m), 0));
.2, -13.n+1] real;
(* odporovy mustek potenciometrem *)
(* rovnice pro smyckove proudy, vysledky *)
a mat 13.178 Fakulta elektrotechniky komunikačních technologií VUT Brně
7.n] real;
mat array[1.2, 8. Výhodné však je, zadání přehledné,
snadno kontrolovatelné dovoluje provádět modifikace. Nastavení běžce dáno parametrem (v
programu nastaveno 0. To, program
musíme vždy zadání nového příkladu znovu zkompilovat, nepůsobí potíže, protože
kompilace ukončena během několika sekund.2 Přílohy
V Příloze jsou uvedeny tři programy, které mohou být užitečné při řešení elektrických
obvodů počítači. pro řešení rovnic rezistorového lineárního obvodu při použití
metody smyčkových proudů nebo uzlových napětí.
const
n pocet rovnic *)
type
const
m 0.1-1 Jednoduchý můstek jako příklad pro použití programu
LINROV
= 8,7 kΩ
= 3,0 kΩ
= 7,0 kΩ
= 1,0 kΩ
Rc
Rc
Rd
Rd
R
Rb
b
I1
I3
2I
program linrov; reseni soustavy linearnich rovnic *)
vek array[1.7+10*(1-m), 9
