【程序说明】 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1+2…+ Ai,Ai!=1 *2*3*Ai(i=1,2… a)。 【程序】 SET TAIK OFF CLEAR INPUT“M=”TO M STORE 0 TO S1,S2 F

admin2010-06-18  25

问题 【程序说明】 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1+2…+ Ai,Ai!=1 *2*3*Ai(i=1,2… a)。

【程序】
SET TAIK OFF
CLEAR
INPUT“M=”TO M
STORE 0 TO S1,S2
FOR I=1 TO M
(8)
   DO SUB1
   DO SUB2
ENDFOR
? ” 所求算式的值为:“+ALLTRIM(STR(S1/S2,15,3))
SET TALK ON
PROCEDURE SUB1
(9)
FOR R=1 TO A
   K=K+R
ENDFOR
(10)
RETURN
PROCEDURE SUB2
(11)
FOR P=1 TO A
   T=T*P
ENDFOR
(12)
RETURN
  

选项 A、PUBLIC T      
B、T=0
C、T=1         
D、PARA T

答案C

解析 从语句“T=T*P”可知需定义变量T并给变量T赋初值1,目的求Aa!的值。
转载请注明原文地址:https://kaotiyun.com/show/FthZ777K
0

最新回复(0)