一行命令: $ perl -e "map{my \$i=\$_;map{my \$j=abs(\$_-\$i);print qq~ABS(\$_-\$i)=~.\$j.qq~: PRIME\!\n~ if((1 x \$j)\!~/\^(11+)\1+\$/)&&(\$j\!~/\^[01]\$/)}(1..100);}(1..100);" |
一行命令 $ python -c"r=range(1,101);print[(i, j)for i in r for j in r if abs(i-j)in[2]+[x for x in r if 2**x%x==2]]" |
欢迎光临 Chinaunix (http://bbs.chinaunix.net/) | Powered by Discuz! X3.2 |