这是我的代码
For[a = 1, a < 50, a++,
For[b = 1, b < 50, b++,
For[c = 1, c < 50, c++,
If[AllTrue[PrimeQ[Table[a i^2 + b i + c, {i, 20}]], PrimeQ],
Print[{a, b, c}]]]]]
但是不出结果，
正确的
代码是什么，应该能搜索到这个经典的二次函数 x^2+x+41

问题已经解决了