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

// 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

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку