В списке отметить формы управления: Выберите один или несколько ответов:

a.
Ручное

b.
Автоматизированное

c.
Автоматическое

d.
Управление по принципу обратной связи

e.
Программное управление

f.
Управление при наличии модели объекта управления

g.
Управление методом проб и ошибок

h.
Институциональное управление

i.
Информационное управление

j.
Мотивационное управление

k.
Ситуационное управление

l.
Управление по отклонениям

m.
Программно-целевое управление

n.
Компенсационное управление

writeln('a[',i,']=',a[i]);

readln;

end.

var

i,j,k: integer;

a,b,c: array [1..30] of integer;

begin

randomize;

j: =0;

k: =0;

for i: =1 to 30 do

begin

a[i]: =random(80)-30;

if a[i] mod 2 =0 then

begin

j: =j+1;

b[j]: =a[i]

end

end;

for i: =30 downto 1 do

if a[i]< 0 then

begin

k: =k+1;

c[k]: =a[i];

end;

for i: =1 to j do

writeln(b[i]);

for i: =1 to k do

writeln(c[i]);

end.

var

i,j,k: integer;

s,p: string;

begin

p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';

readln(s);

k: =0;

for i: =1 to length(s) do

for j: =1 to length(p) do

if s[i]=p[j] then k: =k+1;

writeln(k);

end.

2 единицы в двоичной записи числа 1025

10000000001