$n=<>;for(1..$n){$m=$r=1;$l=0;$i=<>;for(2..$i){$m+=$l;$r+=($m)**2;$l=$m-$l}print "$r\n"}