Как решить задачу на тему матрицы

[Иван99]

Здравствуйте!
По информатике задали задание. Не могу сделать. Помогите, пожалуйста.
Дан двумерный массив размерностью 100Х100 элементов. Пользователь вводит число 0<=k<=99 для заполнения части массива 0 и 1 следующим образом:
5
0 1 0 1 0
1 0 1 0 1
0 1 0 1 0
1 0 1 0 1
0 1 0 1 0

[Sciv]

Что именно не получается? Какой язык программирования?

Учтите: здесь, возможно, найдется альтруист, который решит эту задачу за Вас, но вероятнее всего, ждать его придется оооооооочень долго.

[Serge_Bliznykov]

господя... да что ж тут решать то:

const MaxSize = 100;
var 
  A : array[0..MaxSize-1,0..MaxSize-1] of byte;
  k,  i, j : integer;
begin
  repeat
    WriteLn('Введите размер массива (от 0 до ',MaxSize-1,') : ');
    Readln(K);
 until (K>=0) and (K<MaxSize);
 for i:=0 to K-1 do
   for j:=0 to K-1 do
     A[i,j] := (i+j) mod 2;

 {вывести полученный массив на экран} 
 for i:=0 to K-1 do begin
   for j:=0 to K-1 do  Write(A[i,j],' ');
   WriteLn;
 end;

 Readln
end.

p.s. писал на форуме, не проверял!


p.p.s. хотел бы я посмотреть, как выглядит массив при K = 0

[Иван99]

Спасибо большое за помощь!