Курсовая работа: Автоматизований аналіз злочинності

end;

case q of

0:q:=4;

5:q:=1;

end;

case q of

1: begin

if z=#13 then

vx;

po4atik(st1,st2,st3,st4);

strila(4,1);

end;

2: begin

if z=#13 then

lis;

po4atik(st1,st2,st3,st4);

strila(14,1);

end;

3: begin

if z=#13 then

st;

po4atik(st1,st2,st3,st4);

strila(24,1);

end;

4: begin

if z=#13 then

halt;

po4atik(st1,st2,st3,st4);

strila(32,1);