Sort[{10,1}.Take[IntegerDigits[((#)^2)], -2]& /@ Range[4,99]]