Pascal почему runtime error const size = 100000; var n, i, j: longint; a: array[1..size, 1..size] of integer; begin read (n); for i: = 1 to n do for j: = 1 to n do; a[i][j]: = 0; end.

For i:= 1 to n do
for j:= 1 to n do;
a[i][j]:= 0;

После второго do убери точку с запятой (;)