（PARI）a（n）=k=n；s=1；当（s<5*10^7，如果（s%10，如果（s ^2\（10^（#Str（s^2）-#Str）（k）））==k时，打印1（s ^2，“，”）；k=s^2））；s++）
a（3）
（Python）
定义f（x）：
..打印（x，end='，'）
..n=x
..秒=1
..当s<10**7时：
….如果s%10：
……S=str（S**2）
……如果S.startswith（str（n））：
……..打印（s**2，end='，'）
……..n=s**2
….s+=1
f（3）
