OFFSET
1,2
PROG
(PARI) {m=180; v=Set([]); forprime(p=2, m, i=0; while((s=p^fibonacci(i))<m, v=setunion(v, Set(s)); i++)); v=vecsort(eval(v)); s=0; for(j=1, #v, print1(s=s+v[j], ", "))}
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Giovanni Teofilatto, Apr 23 2006
EXTENSIONS
Edited, corrected and extended by Klaus Brockhaus, Apr 25 2006
STATUS
approved