4.4BSD/usr/src/contrib/gawk-2.15.2/test/sqrt.awk

BEGIN {
    for (i = 0; i <= 25; i++)
	printf "gawk sez -- square root of %2d is %15.12f\n", i, sqrt(i)
}