mathematica 能像Matlab 或者C 语言那样写实现一定功能的子函数吗...答:听谁说不可以了?isPrime1[n_] := Catch[Do[If[Mod[n, i] == 0, Throw@False], {i, 2, n^.5}]; True];isPrime2 = #~Mod~Range[2, # - 1]~FreeQ~0 &;Select[Range[2, 100], isPrime1]Select[Range[2, 100], isPrime2]Clear["`*"];isPrime = Compile[{{n, _...