Анализ и синтез дискретных систем управления технологическими потоками: алгоритмы и программы. Владов Ю.Р. - 60 стр.

UptoLike

Составители: 

km21,km22,km23:integer;
write('qf2='); readln(qf2); write('qf3='); readln(qf3);
');
readln(sb21); write('sb22='); readln(sb22);
2o='); readln(km2o); write('kk11=');
readln(kk11); write('kk12='); readln(kk12); write('kk21='); readln(kk21);
; km11:=km1o;
o;
12;
M1:=qf3 and sb11 and(sb12 or km11 or km23)and kk11 and kk12 and fu1;
d kk21 and kk22 and fu2;
M2= ',M2);
end.
чающей 3 рабочие ма-
шины
KM1:
KM2: (sb22 or km21)and km32 and kku21 and
ku22;
KM3: and kku32;
f1 and km13 and(kk11 or kk12);
2:=qf2 and km24 and(kk21 or kk22);
M3:=q
progra шины}
ar qf,qf1,qf2,qf3,sb11,sb12,sb21,sb22,sb31,sb32,fu1,fu2,fu3:integer;
teger;
,kk32,kku32,KM1:integer;
egin
write('qf='); readln(qf); write('qf1='); readln(qf1); write('qf2='); readln(qf2);
='); readln(fu2);
2=');
readln(sb22); write('sb31='); readln(sb31);
kk11,kk12,kk21,kk22,kku11,kku12,kku21,kku22,fu2,KM1,KM2,M1,M2:integer;
begin
write('qf1='); readln(qf1);
write('fu1='); readln(fu1); write('sb11='); readln(sb11); write('sb12=
readln(sb12); write('sb21=');
write('km1o='); readln(km1o); write('km
write('kk22='); readln(kk22); write('fu2='); readln(fu2)
km12:=km1o; km21:=km2o; km22:=km2o; km13:=not km1
km23:=not km2o; kku11:=kk11; kku21:=kk21; kku12:=kk
kku22:=kk22;
K
KM2:=qf3 and sb21 and(sb22 or km21 or km13)an
M1:=qf1 and km12 and(kk11 or kk12);
M2:=qf2 and km22 and(kk21 or kk22);
writeln('KM1= ',KM1,' KM2= ',KM2); writeln('M1= ',M1,'
2.1.3 Многоконтакторные СДУ
2.1.3.1 СДУ поточно-транспортной линией, вклю
Алгоритм управления в алгебраической форме имеет следующий вид:
=qf and fu1 and sb11 and(sb12 or km11)and km22 and kku12 and kku12;
=qf and fu2 and(sb21 or km12)and
=qf and fu3 and(sb31 or km23)and(sb32 or km31)and kku31
M1:=q
M
f3 and km33 and(kk31 or kk32).
m sdu7; {СДУ ПТЛ, 3 рабочие ма
v
m1o,km11,km12,km13,km2o,km21,km22,km23,km24,km3o,km31:in
km32,km33,kk11,kku11,kk12,kku12,kk21,
Kku21,kk22,kku22,kk31,kku31
KM2,KM3,M1,M2,M3:integer;
b
write('qf3='); readln(qf3); write('fu1='); readln(fu1); write('fu2
write('fu3='); readln(fu3); write('sb11='); readln(sb11); write('sb1
readln(sb12); write('sb21=');
60
           km21,km22,km23:integer;
 kk11,kk12,kk21,kk22,kku11,kku12,kku21,kku22,fu2,KM1,KM2,M1,M2:integer;
 begin
       write('qf1='); readln(qf1); write('qf2='); readln(qf2); write('qf3='); readln(qf3);
       write('fu1='); readln(fu1); write('sb11='); readln(sb11); write('sb12=');
       readln(sb12); write('sb21='); readln(sb21); write('sb22='); readln(sb22);
       write('km1o='); readln(km1o); write('km2o='); readln(km2o); write('kk11=');
       readln(kk11); write('kk12='); readln(kk12); write('kk21='); readln(kk21);
       write('kk22='); readln(kk22); write('fu2='); readln(fu2); km11:=km1o;
       km12:=km1o; km21:=km2o; km22:=km2o; km13:=not km1o;
       km23:=not km2o;          kku11:=kk11;           kku21:=kk21;        kku12:=kk12;
       kku22:=kk22;
       KM1:=qf3 and sb11 and(sb12 or km11 or km23)and kk11 and kk12 and fu1;
       KM2:=qf3 and sb21 and(sb22 or km21 or km13)and kk21 and kk22 and fu2;
       M1:=qf1 and km12 and(kk11 or kk12);
       M2:=qf2 and km22 and(kk21 or kk22);
       writeln('KM1= ',KM1,' KM2= ',KM2); writeln('M1= ',M1,' M2= ',M2);
 end.

        2.1.3 Многоконтакторные СДУ
        2.1.3.1 СДУ поточно-транспортной линией, включающей 3 рабочие ма-
 шины

        Алгоритм управления в алгебраической форме имеет следующий вид:

 KM1:=qf and fu1 and sb11 and(sb12 or km11)and km22 and kku12 and kku12;
 KM2:=qf and fu2 and(sb21 or km12)and (sb22 or km21)and km32 and kku21 and
 ku22;
 KM3:=qf and fu3 and(sb31 or km23)and(sb32 or km31)and kku31 and kku32;
 M1:=qf1 and km13 and(kk11 or kk12);
 M2:=qf2 and km24 and(kk21 or kk22);
 M3:=qf3 and km33 and(kk31 or kk32).

 program sdu7; {СДУ ПТЛ, 3 рабочие машины}
 var      qf,qf1,qf2,qf3,sb11,sb12,sb21,sb22,sb31,sb32,fu1,fu2,fu3:integer;
          m1o,km11,km12,km13,km2o,km21,km22,km23,km24,km3o,km31:integer;
          km32,km33,kk11,kku11,kk12,kku12,kk21,
          Kku21,kk22,kku22,kk31,kku31,kk32,kku32,KM1:integer;
          KM2,KM3,M1,M2,M3:integer;
 begin
       write('qf='); readln(qf); write('qf1='); readln(qf1); write('qf2='); readln(qf2);
       write('qf3='); readln(qf3); write('fu1='); readln(fu1); write('fu2='); readln(fu2);
       write('fu3='); readln(fu3); write('sb11='); readln(sb11); write('sb12=');
       readln(sb12); write('sb21='); readln(sb22); write('sb31='); readln(sb31);
60