Реферат: Проектирование цифровой следящей системы
640 PRINT "S("; I; ")="; S1(I); TAB(40); "G("; I; ")="; S(I)
650 NEXT I
660 END
2060 L = 1
2070 PRINT "Введите постоянные времени числителя T1(I)"
2080 FOR I = 1 TO N
2090 PRINT "T1("; I; ")="
2100 INPUT T(I)
2110 NEXT I
2112 PRINT "Введите коэффициент K"
2114 PRINT "K="
2116 INPUT K
2120 A(0) = 1
2130 A(1) = T(1) + T(2) + T(3) + T(4) + T(5)
2140 X1 = T(1) * T(2) + T(1) * T(3) + T(1) * T(4) + T(1) * T(5)
2150 X2 = T(2) * T(3) + T(2) * T(4) + T(2) * T(5)
2160 X3 = T(3) * T(4) + T(3) * T(5) + T(4) * T(5)
2170 A(2) = X1 + X2 + X3
2180 X1 = T(1) * T(2) * T(3) + T(1) * T(2) * T(4) + T(1) * T(2) * T(5)
2190 X2 = T(1) * T(3) * T(4) + T(1) * T(3) * T(5) + T(1) * T(4) * T(5)
2200 X3 = T(2) * T(3) * T(4) + T(2) * T(3) * T(5) + T(3) * T(4) * T(5)
2210 A(3) = X1 + X2 + X3 + T(2) * T(4) * T(5)
2220 X1 = T(1) * T(2) * T(3) * T(4) + T(1) * T(2) * T(3) * T(5)
2230 X2 = T(1) * T(2) * T(4) * T(5) + T(1) * T(3) * T(4) * T(5)
2240 A(4) = X1 + X2 + T(2) * T(3) * T(4) * T(5)
2250 A(5) = T(1) * T(2) * T(3) * T(4) * T(5)
2260 IF L = 2 GOTO 240
2270 FOR I = 0 TO N
2280 B(I) = A(I) * K