Вкакой строчке допущена ошибка в программе, написанной на языке pascalabc? программа должна высчитывать сумму элементов, стоящих на побочной диагонали в квадратной матрице 6х6. 1) program diag; 2) var 3) mat: array[1..6,1..6] of integer; 4) i,j,s: integer; 5) begin 6) s: =0; 7) for i: =1 to 6 do 8) for j: =1 to 6 do 9) read(mat[i,j]); 10) for i: =1 to 6 do 11) for j: =1 to 6 do 12) if i=j then s: =s+ mat[i,j]; 13) write('сумма элементов, стоящих на побочной диагонали ’); 14) writeln(s); 15) end. а) 12 б) 14 в) 11 г) 6
Указано условие нахождения элемента на главной, а не на побочной диагонали.
Должно быть: if j=7-i then s:=s+ mat[i,j];
ответ: А) 12