求满足2p*p+p+8=m*m-2m的所有素数p和正整数m
题目
求满足2p*p+p+8=m*m-2m的所有素数p和正整数m
答案
Private Sub Command1_Click()For i = 1 To 2000If Prime(Sum_Y(i)) = True And Prime(i) = False Then Print iNextEnd Sub'求素数函数Function Prime(ByVal n As Integer) As BooleanFor i = 2 To Int(Sqr(n))If n ...
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点