Двумерный массив. Вывести на экран двумерный массив (таблицей) из чередующихся нулей и единиц. Вот что я пытаюсь сделать, помогите пожалуйста.

// PascalABC.NET 3.0, сборка 1128 begin   var n:=ReadInteger('n=');   var a:=new integer[n,n];   var k:integer;   for var i:=0 to n-1 do begin     if Odd(i) then k:=0 else k:=1;     for var j:=0 to n-1 do begin       a[i,j]:=k; Write(k); if k=1 then k:=0 else k:=1       end;     Writeln     end end. Тестовое решение: n= 10 1010101010 0101010101 1010101010 0101010101 1010101010 0101010101 1010101010 0101010101 1010101010 0101010101