Программа: Вывод второй строки двумерного массива

Задача: Заполнить двумерный массив. Вывести вторую строку этого массива

PROGRAM vtorayastrmass;
  var i,k:integer;
      M  :array[1..10,1..10] of integer;
BEGIN
  Randomize;
  
  for i:=1 to 10 do
    begin
      for k:=1 to 10 do
        M[i,k]:=random(100);
    end;
    
  WriteLn;
  for k:=1 to 10 do
    Write(M[2,k],' ');
END.

Просмотрело: 2256

Возможно, Вы искали: