程序设计c语言设计游戏 程序设计

导读：就爱阅读网友为您分享以下“程序设计”资讯，希望对您有所帮助，感谢您对92的支持!

〖第1题〗『程序设计』(15分)(题号:458)

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

*【程序设计】

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

*题目：编程计算正整数num的各位上的数字之积。

* 例如，若输入：252，则输出应该是：20。

* 将结果存入变量OUT中，要求用Do While语句实现。

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

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

SET TALK ON

SET LOGERRORS ON

?”输入正整数num=434”

num=434

OUT=-1

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

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

DO YZJ WITH OUT

SET LOGERRORS OFF

SET TALK OFF

答案：----------------------

s=1

do while num<>0

s=s*(num%10)

num=int(num/10)

endd

out=s

? out

----------------------

〖第1题〗『程序设计』(15分)(题号:435)

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

*【程序设计】

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

*题目：编程求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

d=d*10

endf

out=s

? out

----------------------

〖第1题〗『程序设计』(15分)(题号:69)

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

*【程序设计】

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

*题目：从键盘输入三角形的边长，输入边长满足两边之和大于

* 第三边，且为正值。计算并输出三角形的面积S；若不满

* 足以上条件，显示输出”不能构成三角形”。

* 其中面积公式请参看(图1)。

* 将面积值存入变量AREA中。

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

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

SET TALK ON

SET LOGERRORS ON

INPUT TO A

INPUT TO B

INPUT TO C

? “三角形面积为”,FUN(A,B,C)

YZJ()

SET TALK ON

RETURN

FUNCTION FUN(a,b,c)

AREA=-1

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

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

RETURN AREA

FUNCTION YZJ()

USE IN

LOCAT FOR TIHAO=1

IF FOUND()

A=N1

B=N2

C=N3

O=FUN(A,B,C)

DO YZJ1 WITH O

ELSE

?”试题输入文件已损坏，请重新配置考试环境”

ENDIF

RE