1,1

Table of n, a(n) for n=1..86.

u = 2.6522773235669243608033896388048381856...

x = x /. FindRoot[Sqrt[2] EllipticE[x, 1/2] == Pi, {x, 0}, WorkingPrecision -> 200]

RealDigits[x][[1]]

Cf. A335994.

Sequence in context: A004583 A175995 A271533 * A304585 A336074 A021381

Adjacent sequences: A335992 A335993 A335994 * A335996 A335997 A335998

nonn,cons

Clark Kimberling, Jul 04 2020

approved