func nonSqu n .
   return n + floor (0.5 + sqrt n)
.
for i = 1 to 22
   print nonSqu i
.
for i = 1 to 1e6
   j = sqrt nonSqu i
   if j = floor j
      found = 1
   .
.
if found = 0
   print "No squares found"
.
