Guten Tag zusammen && ein frohes && gesundes Neues Jahre jeder && jedem einzeln,
das kann man aus einem Pascalschen Dreieck herstellen, in dem jede einzelne Zahl
quadriert wird, mit anderen Worten
TableForm[Table[Table[Binomial[n, m]^2, {m, 0, n}], {n, 0, 8}],
TableAlignments -> Center]
Mit den besten Grüssen
Udo.
Uta & Peter Klamser schrieb:
> Hallo, Ihr Lieben, eine Kopfnuss zum neuen Jahr.
>
> Wer kann mir die Bildungsregel für die folgende Tabelle nennen, welche mit
> der im Notebook aufgeführte Rekursikon errechnet wurde:
>
> {{1}, {1, 1}, {1, 4, 1}, {1, 9, 9, 1}, {1, 16, 36, 16, 1}, {1, 25, 100, 100,
> 25, 1}, {1, 36, 225, 400, 225, 36, 1}, {1, 49, 441, 1225, 1225, 441, 49,
> 1}, {1, 64, 784, 3136, 4900, 3136, 784, 64, 1}}
>
> Gruß, Peter Klamser
>
> ------------------------------------------------------------------------
> Name: puffer 14.nb
> puffer 14.nb Type: Mathematica 2.2 Notebook (application/mathematica)
> Encoding: quoted-printable