本帖最后由 王守恩 于 2021-2-11 20:43 编辑
找第 1 个,没必要大海捞针。
Table[FindInstance[{Abs[n/x - \[Pi] + 3] < 16/113 - \[Pi] + 3}, {x}, Integers], {n, 2300, 2400}]
{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {},
{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {{x -> 16604}}, {}, {}, {}, {},
{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {{x -> 16717}}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {},
{}, {{x -> 16830}}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \{}, {{x -> 16943}}, {}} |