10 REM > PDP11.ProgTips.SqRootTest
   20 :
   30 sqr=&8000
   40 LOAD "SqRoot/pdp",sqr
   50 :
   60 B%=1
   70 REPEAT
   80     C%=B% DIV 65536
   90     R%=USR sqr
  100     PRINT B%,R% AND &FFFF
  110     B%=B%+1
  120 UNTIL FALSE

Download SqRootTest

BBC BASIC detokeniser and syntax highlighter by Ben Ryves.