FUNCTION FUN(N) OUT=-1

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

********** End ********** RETURN OUT FUNCTION YZJ() USE IN

LOCA FOR TIHAO=3 IF FOUND() N=N1 O=FUN(N) DO YZJ3 WITH O ELSE

?\考试输入文件错误，请重新配置考试环境\ENDIF RETURN

---------------------- p=1

for i=1 to n q=1

for j=1 to i q=q*j endfor p=p*q endfor O=p

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

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

*题目：输出10到50之间所有能被7整除的数。 * (用do while ??enddo语句实现) * 并将这些数的和存入所给变量OUT中 * 请按照题目要求，在下面编写程序代码。

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

SET TALK ON

SET LOGERRORS ON OUT=-1

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

********** End ********** DO YZJ4 WITH OUT USE

RETURN

---------------------- i=10 S=0

do while i<=50 if i%7=0 ?i S=S+I endif i=i+1 enddo O=S

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

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

*题目：在屏幕上纵向输出\计算机等级考试\。（要求用循环语句实现） * 并将第五行的字符输出到给定变量中

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

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

SET TALK OFF

SET LOGERRORS ON Y=\

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

********** End ********** DO YZJ5 WITH Y CANCEL

---------------------- S=\计算机等级考试\i=1

do while i<14 ?subs(s,i,2) i=i+2 enddo Y=\

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

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

*题目：输出下面图形：（要求使用双重循环语句） * * * * * * * * * * * * * *

* 请按照题目要求，在下面编写程序代码。 *要求：将输出第三行的所有字符存入变量S中

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

CLEAR

SET TALK OFF

SET LOGERRORS ON S=\

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

********** End ********** DO YZJ6 WITH S CANCEL

---------------------- for i=1 to 4

for j=1 to i ??\ endfor ? endfor S=\

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