Так как нужны только 3 и 4 элементы, полностью массив можно не рассматривать, достаточно рассмотреть элементы 3 и 4.
Массив заполняется следующим образом:
Если индекс элемента четный, то элементу присваивается i/2.
Если индекс элемента не четный, то элементу присваивается (i+1)/2
У элемента a[3] индекс равен 3, нечетный, значит ему будет присвоено (3+1)/2 = 2
У элемента a[4] индекс равен 4, четный, значит ему будет присвоено 4/2 = 2
Получается, что элемент a[3]=2 и a[4]=2, среднее арифметическое 2.
<span>Сайт в компьютерной сети,все порталы выполняют функции поиска, а также предоставляют интернет-сервисы, например: электронная почта, лента новостей и т. д.
</span>
Var
<span>prin: boolean; </span>
<span>x, y: integer; </span>
<span>begin </span>
<span>readln(x); </span>
<span>readln(y); </span>
<span>if (x <= 0) and (x >= -3) and (y <= x + 3) then </span>
<span>prin := true </span>
<span>else if (x >= 0) and (x <= 3) and (y <= - x + 3) then </span>
<span>prin := true </span>
<span>else if (y <= 0) and (y >= -3) and (abs(x) <= 3) then </span>
<span>prin := true </span>
<span>else </span>
<span>prin := false; </span>
<span>if prin then writeln('принадлежит') else writeln('не принадлежит'); </span>
<span>end.</span>
<span>shift, caps lock) это же элементарно </span>