Курсовая работа: Розробка лінійних систем автоматичного управління (САУ) з цифровою корегуючою ланкою
550 S = N - M
560 IF S = 2 THEN T(3) = .8 * T(3)
570 IF S > 2 THEN T(3) = .7 * T(3)
580 X3 = LOG(1 / T(3))
590 PRINT "T(1)="; T(1); "T(2)="; T(2); "T(3)="; T(3)
600 PRINT "Вираз у дужках знаменника (Т(3)*Р+1) повинен зводитися в ступінь (n-m)"
610 PRINT "n-m="; S
620 FOR I = 1 TO M
630 K = 3 + M
640 PRINT "T("; K; ")="; T(K)
650 NEXT I
660 PRINT "Wc="; OC; "LgWc="; XC
670 PRINT "Lg(1/T1)="; X1; "Lg(1/T2)="; X2; "Lg(1/T3)="; X3
680 END