Lab1_2

var a := new List<List<integer>>;
begin
  for var i := 1 to 5 do
  begin
    var b := new List<integer>();
    for var j := 1 to 5 do
        b.Add(random(-50,50));
    a.Add(b);
  end;

  writeln(a);

  var index: integer;
  write('Введите номер строки: ');
  readln(index);

  writeln('Введите строку: ');
  var c := new List<integer>;
  for var i := 1 to 5 do
  begin
    var temp: integer;
    read(temp);
    c.Add(temp);
  end;

  a.Insert(index - 1, c);

  writeln(a);
end.