while(n:?read(?-,?-,~))#~do dispterms(if(b:next_prime(n))-n<n-a:prev_prime(n+1)then b else a);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page