DouKaku?

import scala.util.Sorting.stableSort

def bingo(n:int) = {
  type PList = List[Pair[int,int]]
  val lst = stableSort[int,double](1 to n,x=>Math.random).zipWithIndex.toList
  val w = lst.size.toString.size+1
  def format(n:int) = String.format("%"+w+"d",Array(n.asInstanceOf[AnyRef]))

  def printline(x:PList) = {
    println(x.map(y=>format(y._2+1)).mkString(""))
    println(x.map(y=>format(y._1)).mkString("")+"\n")
  }

  def show(l:PList):unit = l.splitAt(10) match {
    case (l,Nil) => printline(l)
    case (l,ls) =>  printline(l);show(ls)
  }

  show(lst)
}

bingo(30)
bingo(35)