OFFSET
1,1
EXAMPLE
a(5) = 36 = 1+1+34 = Fib(1)+Fib(2)+Fib(9).
MATHEMATICA
f=Fibonacci[Range[40]]; Select[Union[Flatten[Outer[Plus, f, f, f]]], #<f[[-1]]+2 && IntegerQ[Sqrt[#]] &]
Select[Union[Total/@Tuples[Fibonacci[Range[50]], 3]], IntegerQ[Sqrt[ #]]&] (* Harvey P. Dale, Apr 29 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Carmine Suriano, Jan 12 2011
STATUS
approved