This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A057763 #9 Sep 20 2012 08:47:54
%S A057763 0,1,1,0,5,4,9,5,7,11,6,9,13,7,15,11,8,26,25,17,9,20,13,19,10,45,21,
%T A057763 15,11,51,48,35,25,23,12,17,40,68,55,25,59,13,19,30,27,85,14,76,45,95,
%U A057763 29,65,21,15,66,51,31,103,73,35,16,23
%N A057763 Least nonnegative square root of 5 mod n for n in A057762.
%H A057763 T. D. Noe, <a href="/A057763/b057763.txt">Table of n, a(n) for n=1..1000</a>
%t A057763 A057762 = Prepend[ Select[ Range[300], Reduce[Mod[5 - k^2, #] == 0, k, Integers] =!= False &], 1]; a[n_] := Min[ r /. {ToRules[ Reduce[ Mod[r^2 - 5, A057762[[n]]] == 0, r, Integers] /. C[1] -> 0]}]; a[1] = 0; Table[a[n], {n, 1, 62}] (* _Jean-François Alcover_, Sep 20 2012 *)
%K A057763 nonn
%O A057763 1,5
%A A057763 _N. J. A. Sloane_, Nov 01 2000
%E A057763 Corrected by T. D. Noe, Apr 19 2007 [The errors were caused by the faulty Maple command "mroot"]