Program e; var mas 2 : array [1..10, 1..10] of integer; i, j, k : integer begin for i := 1 to 10 do -⇒ здесь for j := 1 to 10 do -⇒ здесь read (mas2[i, j]; (mas2[1+j]<0); - отсюда мог перепутать порядок for i := 1 to 10 do -⇒ и здесь for j := 1 to 10 do -⇒ и здесь then k := k+1 writeln(k) end. ВОПРОС : Почему цикл for используется два раза ?
Цикл for используется два раза в данном программе для того, чтобы сначала заполнить двумерный массив mas2 значениями, а затем пройтись по этому массиву и выполнить условие (mas2[i,j] < 0). В первом цикле for заполняется массив mas2, а во втором происходит проверка условия и увеличение счетчика k в случае его выполнения.
Цикл for используется два раза в данном программе для того, чтобы сначала заполнить двумерный массив mas2 значениями, а затем пройтись по этому массиву и выполнить условие (mas2[i,j] < 0). В первом цикле for заполняется массив mas2, а во втором происходит проверка условия и увеличение счетчика k в случае его выполнения.