Реферат: Проектирование цифровой следящей системы
36 PRINT "Q(P)=(T2(1)*P+1)*(T2(2)*P+1)*...*(T2(N)*P+1)"
60 PRINT "Искомая дискретная передаточная функция имеет вид:"
70 PRINT "K(Z)=S(Z)/G(Z), где"
80 PRINT "S(Z)=S(0)+S(1)*Z+S(2)*Z^2+...+S(N)*Z^N"
90 PRINT G(Z)=G(0)+G(1)*Z+G(2)*Z^2+...+G(N)*Z^N+G(N+1)*
*Z^(N+1)"
100 DIM A(5), B(5), B1(5), S(5), S1(5), G(6), T1(5), T2(5)
102 FOR I = 0 TO 5
104 A(I) = 0: B(I) = 0: S(I) = 0: G(I) = 0
106 NEXT I
108 R = 1
110 PRINT "Введите порядок полинома Q(P) -N, N<=5"
120 PRINT "N="
130 INPUT N
131 PRINT "Задайте величину коэффициента F"
132 PRINT "F="
133 INPUT F
134 IF F = 1 GOTO 140
135 IF F = 2 GOTO 2060
136 GOTO 131
140 PRINT "Введите коэффициенты числителя В(0)...В(N)"
150 FOR I = 0 TO N
160 PRINT "B("; I; ")="
170 INPUT B(I)
180 NEXT I
190 PRINT "Введите коэффициенты знаменателя A(0)...A(N)"
200 FOR I = 0 TO N
210 PRINT "A("; I; ")="
220 INPUT A(I)
230 NEXT I