n=3
for i=1to 12?"n = ",n," , k = ",int(n/2^.5)
b=n
n=n*6-a+2
a=b
next