找出并输出自然数m至n之间的能被7整除的所有数，其中mA: ga[m_,n_]:=Block[{},Do[If[Mod[k,7]==0,Print[k]],{k,m,n}]]
B: gb[m_,n_]:= Module[{},Do[If[Mod[k,7]==0,Print[k]];{k,m,n}]]
C: gc[m_,n_]:=Block[{},Do[If[Mod[k,7]==0,Print[k]],{k,m,n}]]
D: gd[m_,n_]:= Module[{},Do[If[Mod[k,7]==0;Print[k]];{k,m,n}]]
B: gb[m_,n_]:= Module[{},Do[If[Mod[k,7]==0,Print[k]];{k,m,n}]]
C: gc[m_,n_]:=Block[{},Do[If[Mod[k,7]==0,Print[k]],{k,m,n}]]
D: gd[m_,n_]:= Module[{},Do[If[Mod[k,7]==0;Print[k]];{k,m,n}]]
举一反三
- 定义计算n！的函数。? fa[n_]:= Block[{s=1},Do[s=s*k,{k,1,n}];s]|fc[n_]:= Block[{s=1},Do[s=s*k,{k,1,n}];s]|fd[n_]:= Module[{s=1},Do[s=s*k,{k,1,n}];s]|fb[n_]:= Module[{s=1},Do[s=s*k,{k,1,n}];s]
- "整型变量M能被整型变量K整除"的FORTRAN77表达式是（） A: MOD（M，K）＝0 （MOD（M，K）= =0） B: M－M/K*K .EQ. 0 C: MOD（K，M）＝0 D: MOD（M，K）＝0 == .TRUE.
- "整型变量M能被整型变量K整除"的FORTRAN77表达式是（） A: MOD（M，K）＝0 （MOD（M，K）= =0） B: M－M/K*K .E C: 0 D: MOD（K，M）＝0 E: MOD（M，K）＝0 == .TRU F:
- 下面程序的运行结果是： DO M=1，5，3 DO N=M，3 K=M+N END DO ENDDO PRINT*,K END A: 8 B: 4 C: 7 D: 10
- 已知：M、N和K的值只能有一个1，其他为0，并且满足下列所有逻辑式： ((M AND (NOT K)) OR ((NOT M) AND K)) = 1； (NOT N) AND ((M AND (NOT K)) OR ((NOT M) AND K)) = 1； (NOT N) AND (NOT K) = 1； 问：M、N、K的值为______。