程序填空[1]

*题目:编程求P=1-1/(2x2)+1/(3x3)-1/(4x4)+1/(5x5)。 * (要求使用循环语句求解) * 将结果存入变量OUT中。

* 请按照题目要求,在下面编写程序代码。

*-------------------------------------------------------

SET TALK ON

SET LOGERRORS ON

OUT=-1

**********Program**********

********** End **********

DO YZJ WITH OUT SET LOGERRORS OFF SET TALK OFF ---------------------- P=0 M=1 I=0

DO WHILE M<=5

P=P+((-1)^(M+1))/(M*M) M=M+1 ENDDO ? \OUT=P

*------------------------------------------------------- *【程序设计】

*-------------------------------------------------------

*题目:程序运行时输入一个不超过5位数的整数,求该整数各个 * 位数的乘积。例如输入1234,应输出24。该题目请使用

* FOR-ENDFOR结构编程,运行时务必输入1234,否则扣分。 * 将结果存入变量OUT中。

* 请按照题目要求,在下面编写程序代码。

*-------------------------------------------------------

SET TALK ON

SET LOGERRORS ON

input to n OUT=-1

**********Program**********

********** End **********

DO YZJ WITH OUT SET LOGERRORS OFF SET TALK OFF ---------------------- t=1

s=ltrim(str(n)) for i=1 to len(s) x=val(subs(s,i,1)) t=t*x endf out=t ?out

*------------------------------------------------------- *【程序设计】

*-------------------------------------------------------

*题目:编程求sum=3-33+333-3333+33333的值。 * 要求使用for...endfor语句来完成。 * 将结果存入变量OUT中。

* 请按照题目要求,在下面编写程序代码。

*-------------------------------------------------------

SET TALK ON

SET LOGERRORS ON

OUT=-1

**********Program**********

********** End **********

DO YZJ WITH OUT SET LOGERRORS OFF SET TALK OFF ---------------------- s=0 t=0

d=3

for i=1 to 5 t=t+d

s=s+t*(-1)^(i+1) d=d*10 en

>>展开全文<<
12@gma联系客服:779662525#qq.com(#替换为@)