%I #20 Oct 06 2019 17:50:46
%S 0,1,4,9,61,52,63,94,64,81,100,211,441,961,961,522,652,982,432,631,
%T 400,441,844,952,765,652,766,972,874,841,900,961,4210,9810,6511,5221,
%U 9621,9631,4441,5211,6100,8611,7641,9841,9631,5220,6211,9220,4320
%N Arrange digits of squares in descending order.
%H Vincenzo Librandi, <a href="/A028908/b028908.txt">Table of n, a(n) for n = 0..1000</a>
%H John Case, <a href="http://www.cis.udel.edu/~case/colt.html">COLT Page?</a>
%t FromDigits[Sort[IntegerDigits[#],Greater]]&/@(Range[0,50]^2) (* _Harvey P. Dale_, May 08 2013 *)
%Y Cf. A028907.
%K nonn,base
%O 0,3
%A _N. J. A. Sloane_
%E More terms from _Patrick De Geest_, Apr 15 1998