Заключение. 
Расчет электрической цепи при импульсном воздействии

Данная курсовая работа, помогла мне в первую очередь, закрепить основы анализа дискретных сигналов и линейных дискретных систем, потому, что с классическим, операторным и спектральным методами анализа цепей я был уже знаком, из первого семестра изучения ОТЦ. Однако, я уверен, что повторение вышеупомянутых, пошло мне исключительно на пользу.

То, что значения рассчитанных разными способами характеристик (такие как, например, АЧХ) одинаковы, говорят, о правильности и аккуратности расчета.

Я помню, когда в первый раз пришел на Лекцию по основам теории цепей… Такие слова, как емкость, индуктивность, короткое замыкание… вызывали у меня слабое недоумение из-за слабой школьной базы. Сейчас же я свободно умею решать многие задачи по этой дисциплине, и, как я думаю, не плохо разбираюсь в теории. Конечно же, огромное Спасибо преподавателям кафедры ТЭЦ.

Список использованной литературы

• 1. Бакалов В. П., Дмитриков В. Ф., Крук Б. И. Основы теории цепей. Учебник для вузов — М.: Радио и Связь, 2000 г.
• 2. Тихобаев В. Г. Методические указания к курсовой работе. — Новосибирск, 2001 г.
• 3. Конспект лекций по ОТЦ.

Приложение

Тело программы для вычисления дискретных значений сигнала на выходе U2(n):

program u2;

uses crt;

var a, b, c, q: real;

h, u1: array[0.40] of real;

S:array[0.50] of real;

n, i: integer;

begin.

clrscr;

for n:=0 to 10 do.

u1[n]: =5+2.5*0.2*n;

for n:=10 to 20 do.

u1[n]: =10;

for n:=20 to 40 do.

u1[n]: =0;

for n:=0 to 40 do.

h[n]: =0.6 668*exp (-0.13 334*n);

for i:=0 to 40 do.

for n:=0 to i do.

begin.

q:=u1[n]*h[i-n];

s[i]: =s[i]+q;

end;

for i:=0 to 9 do.

writeln ('u2[ ', i,']=', s[i]: 5:4,' u2[', i+21,']=', s[i+21]: 5:4);

for i:=10 to 19 do.

writeln ('u2[', i,']=', s[i]: 5:4,' u2[', i+21,']=', s[i+21]: 5:4);

writeln ('u2[', 20,']=', s[20]: 5:4);

readln;

end.

Программа выдает в итоге 2 столбца с дискретными значениями моего сигнала на выходе дискретной цепи U2[0]-U2[40], с округлением до 4 знака после запятой.

Тело программы для вычисления дискретных значений сигнала на выходе корректора U'2(n):

program u2;

uses crt;

var a, b, c, q: real;

h, u1, s1,h1,s:array[0.40] of real;

n, i: integer;

begin.

clrscr;

for n:=0 to 10 do.

u1[n]: =5+2.5*0.2;

for n:=10 to 20 do.

u1[n]: =10;

for n:=20 to 40 do.

u1[n]: =0;

u1[0]: =2.5;

u1[20]: =5;

for n:=0 to 40 do.

h[n]: =0.6 668*exp (-0.13 334*n);

for i:=0 to 40 do.

for n:=0 to i do begin.

q:=u1[n]*h[i-n];

s[i]: =s[i]+q;

end;

h1[0]: =14.75;

h1[1]: =-12.95;

for i:=2 to 40 do h1[i]: =0;

for i:=0 to 40 do.

for n:=0 to i do begin.

q:=s[n]*h1[i-n];

s1[i]: =s1[i]+q;

end;

for i:=0 to 9 do.

writeln ('s1[ ', i,']=', s1[i]: 5:4,' s1[', i+21,']=', s1[i+21]: 5:4);

for i:=10 to 19 do.

writeln ('s1[', i,']=', s1[i]: 5:4,' s1[', i+21,']=', s1[i+21]: 5:4);

writeln ('s1[', 20,']=', s1[20]: 5:4);

readln;

end.

Программа выдает в итоге 2 столбца с дискретными значениями моего сигнала на выходе корректора U'2[0]-U'2[40], с округлением до 4 знака после запятой.