2. Отметьте все правильные объявления массива в языке Паскаль. var A[1..20] of integer; var A: array [1..20] of integer; var A: array [-8..10] of integer; var A: array [-8..10]; var A[1..10]; 6. Массив нужно заполнить именно так: X = [12 9 6 3 0 -3] Какой оператор надо поместить в тело цикла for k:=1 to 6 do begin ... end; X[k]:= k; X[k]:= 14 - 2*k; X[k]:= 3*k - 15; X[k]:= 3*(k - 1) + 6; X[k]:= 15 - 3*k; 9. Массив заполнен числами: A = [3 5 2 1 4] Какое число выведет на экран оператор write ( A[A[4]] ); 10. Массив X = [4 3 2 1 5] обработан с цикла for i:=1 to 5 do begin X[i]:= X[i]+1 end; Что выведен на экран оператор write( X[3] );

ответ:   2.  3)var A: array[1..20] of integer; потому что нужно указать знаменатель массива потом двоеточие, array и кол-во чисел в массиве в квадратных скобках и указать тип integer

6. for k:=1 to 6 do

begin

X[k]:= 15 - 3*k;

end;

( можно просто подставить числа и алгебраическая последовательность получится)

9. число 1, так как это 4 индекс массива

10. число 3 так как 2+1=3(цикл увеличивает число массива на единицу)

Граф - множество вершин и ребер, соединяющих эти вершины.
Он несет информацию об элементах системы и связи между ними.
Элементы системы изображаются как вершины или узлы графа.
Отношения между ними изображаются как ребра или дуги графа.
Деревом называют ациклический (то есть между любыми вершинами есть только один путь), связный (то есть от любой вершины графа можно добраться в другую) граф.
Корень дерева - это вершина с нулевой степенью захода (то есть в нее не ведут другие ребра). Для неориентированного графа это просто выбранная нами вершина.
Ветви - это ребра дерева.
Листья дерева - это вершины с нулевой степенью исхода (то есть из них не выходят ребра), т.е. не имеющих поддеревьев.
Надеюсь объяснил доступно.

Var s:string;
n,k,i:integer;
begin
for n:=1 to 2 do
 begin
 writeln('Введите строку ',n,':');
 readln(s);
 k:=0;
 for i:=1 to length(s) do
  begin
  case s[i] of
   '[': k:=k+1;
   ']': k:=k-1;
   end;
  end;
 if k=0 
 then writeln('В строке ',s,' количество [ и ] одинаково')
 else writeln('В строке ',s,' количество [ и ] не одинаково');
 end;
end.

Пример:
Введите строку 1:
c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c
В строке c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c количество [ и ] одинаково
Введите строку 2:
Просто [ пример ]] со [[ скобками
В строке Просто [ пример ]] со [[ скобками количество [ и ] не одинаково