Перед вами часть кода программы на языке pascal. sum: =0; for i: =1 to n do for j: =1 to n do if (i< =j) and (i+j< =n+1) then sum: =sum+x[i,j]; writeln(sum); результатом выполнения этого кода является: 1) сумма элементов ниже и на главной диагонали, ниже и на побочной диагонали; 2) сумма элементов выше и на главной диагонали, ниже и на побочной диагонали; 3) сумма элементов ниже и на главной диагонали, выше и на побочной диагонали; 4) сумма элементов выше и на главной диагонали, выше и на побочной диагонали.

iae1512p0dn07    1   18.09.2019 08:20    0