〓 Mathematica 七 〓 [転載禁止]©2ch.net

[0798 １３２人目の素数さん 2019/07/17(水) 18:52:19.50 ID:BWCFMYci]

If[1 == p, q, 0] + If[2 == p, q, 0] + If[3 == p, q, 0] /. p -> 2
だから　q だろうね。

Sum[If[q == p, q, 0] /. p -> 2, {q, 1, 3}]
だと２だよ。