A/B:-B is A+round(A^0.5). m:-numlist(2,90,A),maplist(/,A,B),write(B).
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page