prog;

begin
  var a : array [5,5] of string;
  var b : array [5,5] of int

  a[0,0] := "a";
  a[1,1] := "b";
  a[2,2] := "casdfasdfsfasdfdsf";
  a[3,3] := "abcdefghijklmnopqrstuvwxyz";
  a[4,4] := "a quick brown fox jumps over a lazy dog";

  b[0,0] := 2;
  b[1,2] := 5;
  b[2,2] := 9;
  b[3,3] := 0;
  b[4,4] := 2;

  write a / b;
  write a / b / b / b;

end;
end prog