print #1, "Угол отсечки, град............................……………………….",tet
print #1, "Коэффициенты Берга для угла отсечки: "
print #1, "Alfa0= ";fnalfa0(tetta)
print #1, "Alfa1= ";fnalfa1(tetta)
print #1, "Gamma0= ";fngamm0(tetta)
print #1, "Gamma1= ";fngamm1(tetta)
print #1, : print #1,
print #1, " Режим работы:" : print #1,
print #1, " Коэффициент использования напpяжения, B....………….. ";ksy
print #1, " Напpяжение первой гармоники на коллекторе, В ………...";uk1
print #1, " Амплитуда 1-й гаpмоники коллекторного тока, А……….. ";ik1
print #1, " Постоянная составляющая коллекторного тока, А………...";ik0
print #1, " Мощность первой гармоники на выходе, Вт......…………...";p1
print #1, " Мощность, потpебляемая коллекторной цепью, Вт………..";p0
print #1, " Мощность, pассеиваемая на коллекторе, Вт.....…………….";pr
print #1, " КПД коллекторной цепи.......................……………………...";kpd
print #1, " Управляющий заряд, нКл.......................…………………….";qu
print #1, " Минимальное мгновенное напpяжение на эмиттерном"
print #1, " переходе, В..................................……………………………. ";uemin
print #1, " Постоянная составляющая на эмиттере, В.......……………..";ue0
print #1, " Сопротивление коллекторной нагрузки, Ом......……………";rk
print #1, " Амплитуда первой гармоники суммарного тока базы "
print #1, " учетом тока емкости коллекторного перехода, А…………..";ibsr
print #1, " Сопротивление коррекции закрытого перехода, Ом………..";rz
print #1, " Мощность,потребляемая цепью коррекции, Вт....…………..";pwsr
print #1, " Входное сопротивление, Ом....................…………………….";rw
print #1, " Мощность, потребляемая на входе, Вт...........……………….";pw2sr
print #1, " Мощность на входе, потребляемая каскадом, Вт.…………..";pw
print #1, " Коэффициент передачи по мощности............………………..";kp
print #1, " Входная индуктивность, нГн...................…………………….";lw
print #1, " Входная емкость, пФ..........................…………………………";cw
print #1, " Усредненн. за период сопротивление коррекции, Ом ……...";rpar
goto 80
40 print "Максимальны ток коллектора не должен"
Продолжение приложения А
print "Превышать ";0.8*ikdop;" A" : goto 30
50 print "Мощность рассеяния на коллекторе превышает допустимую"
print " Измените исходные данные "
goto 10
60 print "Мгновенное напряжение на базе превышает допустимое"
print " Измените исходные данные "
goto 10
70 print "Напряжение питания не должно превышать";ukdop/2;" B"
goto 20
80 end