@Zzzadruga

Будьте добры, подскажите, как решать задачи такого типа?

• Значения элементов двухмерного массива A[1..100,1..100] задаются с помощью следующего фрагмента программы:
  
  

  Pascal
  1 2 3 4 5 for i:=1 to 100 do for k:=1 to 100 do if i > k then      A[i,k] := 1 else A[i,k] := -1;

  Чему равна сумма элементов массива после выполнения этого фрагмента программы?
  
  1) 0 2) 100 3) -100 4) -200

Заранее спасибо!

Добавлено через 9 минут
Если я правильно понял, то i<k и i>k будет поровну, все решит i=k - здесь таких 100, значит отрицательных будет больше на 100, то есть ответ 3?

0

@Yurek

Всё довольно просто.
Циклы перебирают последовательно каждый элемент массива 100х100. Для каждого элемента проверятся условие i > k, где i, k - текущие индексы массива, то есть фактически координаты элемента, указывающие его пложение - в какой строке и столбце. Если условие выполняется, то в элемент массива заносится единичка, в противном же случае минус единичка.

Остаётся выяснить, какие элементы охватывает условие i>k. Оказывается, что это вся верхняя часть массива, расположенная над его диагональю, за исключением самой диагонали. Во все элементы этой области записываются значение 1.

Вторая область массива явзяется исключением из условия i>k, то есть значит фактически условие для второй половинки i<=k. Что описывает элементы на главной диагонали и ниже её. Во все элементы этой области записывается значение минус 1.

В итоге выполнения циклов имеем две области отличающиеся количеством элементов равных их количеству на диагонали. Диагональ насчитывает 100 элементов, в которых занесены значения минус 1.
Области по обе стороны диагонали взаимонейтрализуются до нулей при сложении, нетронутой останется диагональ, где 100 элементов по -1. Если их сложить, то будет минус 100.

Так что ответ №3 будет верным: сумма равна -100.

0