prog;

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

  a[0] := "a";
  a[1] := "bccc";
  a[2] := "c////////";
  a[3] := "ddddd";
  a[4] := "e3333333333";

  b := 2;

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

end;
end prog