Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Курсовая ОТЦ ТЭЦ Качан АЭС А-53 2007.doc
Скачиваний:
23
Добавлен:
11.04.2015
Размер:
664.06 Кб
Скачать
  1. Заключение.

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

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

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

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

1. Бакалов В.П., Дмитриков В.Ф., Крук Б.И. Основы теории цепей. Учебник для вузов - М.: Радио и Связь, 2000 г.

2. Тихобаев В.Г. Методические указания к курсовой работе. – Новосибирск, 2001г.

3. Конспект лекций по ОТЦ.

  1. Приложение:

Тело программы для вычисления дискретных значений сигнала на выходе 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.06668*exp(-0.13334*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.06668*exp(-0.13334*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 знака после запятой.

1