OFFSET
1,1
EXAMPLE
Triangle begins:
3;
1,3;
4,1,3;
1,4,1,3;
5,1,4,1,3;
... (reverse order of 3; 3.1; 3.14; 3.141; 3.1415; ...)
MATHEMATICA
Module[{nn=20, pid}, pid=RealDigits[Pi, 10, (nn(nn+1))/2][[1]]; Table[ Reverse[ Take[ pid, n]], {n, nn}]]//Flatten (* Harvey P. Dale, Aug 13 2019 *)
PROG
(PARI) a(n)=if(n<1, 0, default(realprecision, n+2); floor(Pi*10^(n-1))%10);
b(n)=1+binomial(1+floor(1/2+sqrt(2*n)), 2)-n;
for(n=1, 120, print1(a(b(n))", "))
CROSSREFS
KEYWORD
AUTHOR
Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 07 2004
STATUS
approved