1) Сколько раз выполнится цикл? a:=12;
нц для і от 3 до 11 шаг 2

a:=a+8;
кц
2) Определите значение переменной k после выполнения следующего по фрагмента программы
K:=5
Нц пока k<=8
K:=k+1
Кц
3) Какое значение будет присвоено переменной x после выполнения данного фрагмента:
y:=24 mod 9;
x:=9;
Если x>y
То x:=x+2;
Нц пока x>50
X:=x-3

Среди самых распространённых действий, выполняемых промышленными роботами, можно назвать следующие[50][51]:

перенос материалов (перенос деталей и заготовок от станка к станку или с конвейера на конвейер, штабелирование, работа с поддонами, укладка деталей в тару и т. п.);
обслуживание станков и машин (загрузка и разгрузка станков, удерживание обрабатываемой детали);
дуговая и точечная сварка;
литьё (особенно литьё под давлением);
ковка и штамповка;
нанесение покрытий распылением;
другие операции обработки (сверление, фрезерование, клёпка, резка водяной струёй, обдирка, очистка, шлифовка, полировка);
сборка механических, электрических и электронных деталей;
контроль качества продукции и др.

Program z3;  Var y: array [1..15] of real;      g: array [1..20] of real;      i,d: integer; sum, sum_2: real;Begin  writeln('Введите оплату труда за день'); read(d);  for i := 1 to 15 do    y[i] := random (30) * d * 0.8;      for i:=1 to 20 do    g[i] := random (30) * d * 0.8;    for i:=1 to 15 do  begin    writeln('Сотрудник y_',i,' - ',y[i]);    sum:= sum + y[i];  end;  writeln;  writeln('Сумма отдела y - ', sum);  writeln;  for i:=1 to 20 do  begin    writeln('Сотрудник g_',i,' - ',g[i]);    sum_2:= sum_2 + g[i];  end;  writeln;  writeln('Сумма отдела g - ', sum_2);  writeln;    End.