Code proposé par Régis Caspar

\documentclass{article}
 
\usepackage{fp-pas}\FPmessagesfalse
\usepackage{multido}
 
\makeatletter
\let\@nil\relax
\def\Row[#1]{%
  \begingroup
  \par\centering
  \baselineskip=0pt
  \nointerlineskip
  \printrow#1,\@nil
  \par\vskip-\fboxrule
  \endgroup
}
\def\printrow#1,#2\@nil{%
  \fbox{%
    \hbox to\Boxwd{%
      \hss
      \vbox to\Boxht{%
        \vss#1\vss
      }%
      \hss
    }%
  }%
  \hskip-\fboxrule
  \def\@arg{#2}%
  \ifx\empty\@arg
    \let\next\relax
  \else
    \let\next\printrow
  \fi
  \expandafter\next\@arg\@nil
}
\def\setBoxdim#1#2{%
  \def\Boxht{#2}%
  \def\Boxwd{#1}%
}
\def\trianglePascal#1{%
  \ifnum#1>63%
    \typeout{ERROR: \string\trianglePascal{63} maximum}
  \else
    \multido{\i=0+1}{#1}{\FPpascal\foo{\i}\expandafter\Row\foo}
  \fi
}
\makeatother
 
\begin{document}
 
\setBoxdim{8mm}{6mm}
\trianglePascal{10} % max 63 (limite de fp-pas.sty)
 
\end{document}
Flattr