RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/Objeck/create-a-two-dimensional-array-at-runtime.objeck

class TwoDimArray  {
  function : Main(args : String[]) ~ Nil {
    rows := Standard->ReadLine()->ToInt();
    cols := Standard->ReadLine()->ToInt();

    if(rows > 0 & cols > 0) {
      array := Float->New[rows, cols];
      array[0,0] := 42.0;
      Standard->Print("The number at place [0,] is: ")->PrintLine(array[0,0]);
    }
  }
}