CLS OPTION BASE I DATA
0.10,20,50.05,7-
0,100,200,500.5-
,700,1000,2000,-
2122,5000,
7000,10000,2000-
0,50000,70000,1-
00000,20000 FOR R = 1 TO 20 READ F W = 2*3.1415927# * F A = .000318 В = .00318 С = .000075 REALU = 1
- W^ 2 * В * С + W^ 2 *A * (В + С) IMAGU = W^ (А -В - С - W^ 2 * A * В * С) LOWER = (1 - W^ 2 *B * С)" 2 + W^ 2 * (В
+ С)^ 2 MAG = SQR <REALU^ 2 + IMAGU* 2) / LOEWR GAIN = (((19.91102 + 8.68589 *
LOG(MAG))*1000)-
\1)/ 1000 REM
THE 8.68589 FACTOR ARISES BECAUSE QBASIC USES NATURAL LOGS PHASE = ((572.96 * ATN(IMAGU / REALU))\ 1)/ 10 PRINT F, GAIN,
PHASE NEXT R Необходимо отметить, что порядок операций, установленный при использовании этой программы, имеет жизненно важное
значение, и что числа, следующие после команды DATA должны быть напечатаны в одну линию, даже несмотря на то, что они могут
не умещаться по ширине экрана (или страницы) на дисплее. Далее, несмотря на то, что амплитудная характеристика была нормирована
относительно значения частоты 1 кГц, для частотных характеристик операция приведения (нормирования) не использовалась. Из
результатов, приведенных в табл. 8.5, видно, что высокое значение усиления (коэффициента передачи) необходимо в диапазоне
низких частот, тогда как ослабление на высоких частотах должно продолжаться безгранично, что исключает применение
последовательно-
й обратной связи, так как усиление не может падать до значения меньше единицы. Хотя такое снижение и может достаточно точно
компенсироватьс-
я за точкой схемы, соответствующей точке введения обратной связи усилителя, в
действительност-
и это означает, что характеристика перед компенсацией возрастает, что вызывает опасность роста искажений и увеличенного запаса
в ультразвуковой области. Таблица 8.5 Частота, ГцКоэффициент передачи, дБотносительно уровня 1 кГцФаза, градусы
019,91101019,74-
3-10,4
2019,274-2050,6-
516,94140,6
7015,283-48,410-
013,088-54,8
2008,219-59,650-
0,52,6443-52,6
7001,234-49,710-
000-49
2000-2,589-55,9-
2122-2,866-56,9
5000-8,210-
