Program e; var mas 2 : array [1..10, 1..10] of integer; i, j, k : integer begin for i : = 1 to 10 do - id920861320210915 от kolosochok1 15.09.2021 21:16

Question

Информатика: 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 используется два раза ?

kolosochok1 · Accepted Answer

//PascalABC.NET версия 3.3.5 var  ar: array[0..3] of integer;   digits: array[0..9] of integer;   out: array[1..4, 1..7]of integer; begin   for var i := 0 to 9 do     digits[i] := 0;   var sum := 0;   for var i := 1 to 2 do   begin     out[i][1] := 1053;     out[i][2] := 1077;     out[i][3] := 1074;     out[i][4] := 1077;     out[i][5] := 1088;     out[i][6] := 1085;     out[i][7] := 1086;   end;   out[4][1] := 1053;   out[4][2] := 1077;   out[4][3] := 1074;   out[4][4] := 1077;   out[4][5] := 1088;...

MOGZ ответил