%I A067722
%S A067722 1,3,6,9,5,15,18,21,10,7,30,33,15,39,42,45,9,51,14,57,25,63,66,69,30,
%T A067722 11,78,21,35,87,90,93,18,99,102,105,13,111,114,117,50,123,126,129,55,
%U A067722 35,138,141,27,15,22,153,65,159,42,165,70,171,174,177,75,183,186,49,17
%N A067722 Least number k such that n (n + k) is a perfect square.
%e A067722 a(8) = 10 because 8 (8+10) = 144 = 12^2.
%t A067722 Do[k = 1; While[ !IntegerQ[ Sqrt[ k (k + n)]], k++ ]; Print[k], {n, 0,
75} ]
%Y A067722 Sequence in context: A163341 A019700 A151862 this_sequence A049341 A137991
A021077
%Y A067722 Adjacent sequences: A067719 A067720 A067721 this_sequence A067723 A067724
A067725
%K A067722 nonn
%O A067722 0,2
%A A067722 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 05 2002
|