OFFSET
1,1
FORMULA
PROG
(PARI) default(realprecision, 101000); v=digits(floor(Pi*10^10^5));
lista(nn) = {my(x=21, s=103); for(k=2, nn, s-=v[k-1]; if(s==100, print1(x, ", "), while(s<100, s+=v[x++]); if(s==100, print1(x, ", ")))); } \\ Jinyuan Wang, Mar 22 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Zak Seidov, Jun 22 2005
STATUS
approved