首页  前一页  后一页  末页
[311] [312] [313] [314] [315]
本留言簿共有493条记录, 现在时间2025-5-24 9:18:26,计算机地址:192.168.9.44
日期查询:
现在是第62页
一共有99页
Books库中表及结构信息 环境:一键安装 库表:Mysql.sql  xx3.sql xx4.sql 页面:Myphp.php   
序号 留言内容
315

D:2017-1-3
T:15:59:00
IP:192.168.9.124



作者:
张顺海

2017.01.03 课堂练习

考试题目

学生考试结果

考试结果

成绩分析

成绩分析

314

D:2017-1-3
T:13:43:00
IP:192.168.9.124



作者:
张顺海

2017.1.3 星期二

实训内容:循环控制中的Exit和Loop语句

实训目的:循环结构的提前退出和提前循环语句

实训过程:

一、理论指导

1.exit语句

应用目的:从 DO WHILE、FOR 或 SCAN 循环中退出。
 
应用环境:DO WHILE ... ENDDO | FOR EACH ... ENDFOR | FOR ... ENDFOR | SCAN ... ENDSCAN
 
 
 
2.Loop语句
 
应用目的:可以放置 LOOP 到 DO WHILE 和 ENDDO 之间的任何地方, FOR 和 ENDFOR 或 FOR EACH 和 ENDFOR, 或SCAN 和 ENDSCAN 之间的任何地方。
 
应用环境:LOOP 命令直接返回控件到 DO WHILE, FOR 或 FOR EACH 子句不执行 LOOP 和 ENDDO 或 ENDFOR 之间的语句。计数一样增加或减少就象运行到了 END... 语句一样
 
3.循环语句应用目的
 
for.....endfor: 已知循环次数的循环
for each....endfor :循环应用于数组的操作(以后我们会讲到)
scan.....endscan:循环应用于数据表的记录操作
do while.....enddo:未知循环次数据的循环(即条件控制)
 
exit:退出当前循环,一般放在条件判断里,即if  ......endif之间
loop:不经过endfor 或enddo,继续下一次循环条件判断!
 
4.Do case ......Endcase的应用 
 
DO CASE
 
   CASE 条件1
   [程序段1]
 
   [CASE 条件2 
   [程序段2]]
   ...
   [CASE 条件n 
   [程序段]]
 
   [OTHERWISE 
   [程序段n+1]]
 
ENDCASE
 
 
二、实训例子
 
 
以上链接中的第11、12题,请大家认真看一下!就是Exit的用法!请大家注意 Do while .t.   ......Endd中的条件构成的是死循环,一般用exit控制有条件退出!
 
本节实例:

*P20171003 文本菜单控制  (本程序段下载

clea
DO whil .t. &&这里用的条件是.t.,即永远为真的意思,它会和Enddo构成死循环,需要exit退出!
   TEXT
      1.清除显示屏幕
      
      2.显示数据表记录
      
      3.计算1-100的和
      
      4.退         出
   ENDTEXT
   ?
   WAIT SPACE(25)+"请选择[1-4]" to n
  
   DO CASE


   CASE n="1"
        CLEAR
       
   CASE n="2"
        ?
        acce SPACE(25)+"请输入你要打开的表" to wj
        IF FILE("&wj..dbf")
           SELECT * from "&wj"
        ELSE
           ? "你要打开的文件【&wj.】不存在!"
        ENDIF
       
   CASE n="3"
        s=0
        FOR i=1 to 100
            s=s+i
        ENDFOR
        ?
        ? SPACE(25)+"1-100的和是:",s
  
   CASE n="4"
        EXIT  &&如果选择菜单中的4的话,那么就提前退出
  
   OTHERWISE
        ?
        ? SPACE(25)+"你的输入有误,请输入【1-4】之间的数字"
        loop  


   ENDCASE
  
  ENDDO
  
  
   ? SPACE(25)+"已经成功退出"  &&space(25)就是产生25个空格的字符串,这里的用意,就是让“已经成功退出”这个提示,向右25个位置输出!
   RETURN
  
  

 

313

D:2016-12-27
T:15:52:00
IP:188.188.2.191



作者:
张顺海

2016.12.27 星期二

实训内容:循环控制(二)

实训目的:掌握For.....Endfor与Do while .....Enddo的应用

实训难点:循环控制的应用

实训过程:

一、显示1 2 3 4 5 6 7 8 9 10

clea

for i=1 to 10

??i

endfor

return

 

二、s=1!+2!+3!+4!+5!

clea

s=0

n=1

for i=1 to 5

n=n*i

s=s+n

endfor

?"s=“,s

return

三、s=1/1+1/2+1/3+1/4+1/5

clea

s=0

for i=1 to 5

s=s+1/i

endfor

?"s=“,s

return

四、打印1 2 3 4 5 6 7 8 9 10

clea

i=1

do whil i<=10

 ?? i
 i=i+1

enddo

return

 

本段程序代码与下边的等效,效果为已知循环次数的循环!

clea

for i=1 to 10

?? i

endfor

return

 

 

五、s=1/1+1/2+1/3+1/4+1/5+....1/n,当s>2.52时的n值是多少(本程序段代码为,未知循环次数的循环控制)

clea

s=0

n=1 

do whil s<=2.52

?? s,1/n
s=s+1/n

n=n+1

enddo

?
?"s=",s

?"n=",n-1 &&想想为什么减1,初值为1,1/n中n不能为零!(想一想可不可以有别的办法)

return

六、打印1-255个数,每打印10个一行

clea

for i=1 to 255

??str(i,4)     &&把N型数转换成字符串,可以更有效的控制数据的输出格式,比较规整!

if mod(i,10)=0

?

endif

endfor

return

 

 

312

D:2016-12-25
T:14:40:00
IP:188.188.2.191



作者:
张顺海

2016.12.26 星期日

实训内容:程序设计案例1

实训目的:掌握程序案例的使用,执行和判断

实训重点:掌握如果看到一个实例,我们把它变成自己的程序,用以输入和执行

实训难点:

实训过程:

一、实训内容

程序案例网址:http://192.168.8.40/ch01/cxly.asp?page=62#timu311

本节实训的案例:/ch01/photo/v76/考题20161221.png

二、实训要求

1.要求显示100-800之间的除4余1,除5余3的个数

CLEAR &&这个语句是清屏语句
n=0
FOR i=100 to 800
 IF MOD(i,4)=1 and MOD(i,5)=3
  n=n+1
 ENDIF
ENDFOR
 ?n
 
*本题运行结果是35 

*这段程序主要是考察咱们三个方面的意思
 *1.程序中循环结构的控制
 *2.mod函数的应用(即如何实现4、5的余数操作)
 *3.n=n+1的使用,即(计数器)的应用
 
*!*  计数器的应用:
*!*  1..赋值n=0
*!*  2.n=n+1,实现自累加1
*!*  3.输出n的值(n的值,就是n由零变化到35的过程,因为每次累加1,说明这个语句执行过35次)

2.上边这道题目的要求更改如下

显示3-180之间3的倍数和所有除5余1的数,最后分别输出3的倍数个数,和除5余1的个数。(本道题目,就是对上边三点的应用)

text
 
新的题目要求
显示3-180之间3的倍数和所有除5余1的数,最后分别输出3的倍数个数,和除5余1的个数。(本道题目,就是对上边三点的应用)
 
ENDTEXT
 
 m=0 &&这个统计3的倍数
 n=0 &&这个统计除5余1的个数,这两个都需要提前赋值为零
 m1="" &&这个是字符串的累加器,用来保存3的倍数,也就是字符串越来越长
 n1="" &&这个是字符串的累加器,用来保存除5余1的,也就是字符串越来越长
 FOR i=3 to 180
   IF MOD(i,3)=0
      m1=m1+STR(i,4)
      m=m+1
   ENDIF
   IF MOD(i,5)=1
      n1=n1+STR(i,4)
      n=n+1
   ENDIF
 ENDFOR
 
 ? "3的倍数有:",m1 
 ? "3的倍数有",m,"个" &&结果是60个
 ?
 ?
 ? "除5余1的有:",n1  &&结果是
 ? "除5余1的有:",n,"个" &&结果是35个
 RETURN

统计3-180之间的某个条件的数的个数

上边程序的源代码

 

三、程序样例(宫格)

*魔方
CLEAR
_screen.FontSize=10
input "请输入宫格数" to n
DIMENSION a(n,n)
IF MOD(n,2)=0
   ? "请输入奇数"
   RETURN
ENDIF
 
 
d=INT(n/2)+1
c=1
a(d)=c
x=1
y=d
FOR i=1 to n*n
  a(x,y)=c
  c=c+1
  IF MOD(i,n)=0
     x=x+1
  ELSE
     x=x-1
     y=y+1
     IF x<1
        x=n
     ENDIF
     IF y>n
        y=1
     ENDIF
   ENDIF
ENDFOR
?
s=0
FOR i=1 to n
   s=s+a(i,1)
   FOR j=1 to n
       ?? STR(a(i,j),LEN(ALLTRIM(STR(n*n)))+1)
   ENDFOR
   ?
ENDFOR
? ALLTRIM(STR(n*n)),"宫格的横行、纵列、对角线上",ALLTRIM(STR(n)),"个数字之和为:",ALLTRIM(STR(s))
RETURN
 
3*3九宫格
 
5*5二十五宫格
 
7*7四十九宫格
 
11*11一百二十一宫格

三、累加器和累乘器

clea

s=0  &&累加器,初值为零

m=1 &&累乘器,初值为1

for i=1 to 5

    m=m*i

    s=s+m

endfor

? "5!=",m

? "1-5的阶乘和:",s

return

四、练习与作业

1.掌握程序设计的循环应用语法(For.......Endfor)

2.利用循环设计语句解决重复计算的案例。

3.本周课程的四个案例,读懂、录入、调试、运行!

4.简单的程序会用(Do.....Enddo)改写

 

311

D:2016-12-20
T:20:38:00
IP:192.168.9.168



作者:
张顺海

考试酷(http://www.examcoo.com/

个人登陆:(http://www.examcoo.com/passport/login

 

 程序设计参考案例:(/ch01/photo/v76/考题20161221.png)  2016.12.21整理上传

 程序改错参考案例:(/ch01/photo/v76/考题20161221_2.png) 2016.12.21整理上传

 

 

微机92班资料图,本班班号:182577,创建时间2017.3.2

 


账号 姓名
单位 班级
身份
操作 其他
- 2107570 红色记忆 徐水区职业技术教育中心 创建者   考过的答卷修改备注姓名  
1 2278344 于聪 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
2 2278345 张浩喆 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
3 2278346 王驰 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
4 2278347 刘志杰 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
5 2278348 高金宇 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
6 2278350 张乐 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
7 2278351 刘少谍 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
8 2278352 叶世龙 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
9 2278353 王梓晗 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
10 2278354 刘成奥 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
11 2278355 李艳秀 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
12 2278357 王勇 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
13 2278359 李伟 学生 - 移除该成员设为管理员 考过的答卷修改备注姓名
14 2278360 李腾飞 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
15 2278361 张洋 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
16 2278362 霍俊莹 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
17 2278363 王佳祺 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
18 2278364 田梦龙 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
19 2278365 周放 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
20 2278366 刘子彤 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
21 2278367 李天宇 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
22 2278368 刘泽祺 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
23 2278369 张贺川 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
24 2278370 林天文 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
25 2278371 申雨蒙 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
26 2278372 田毅萍 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
27 2278373 王然 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
28 2278374 米东海 学校 - 移除该成员设为管理员 考过的答卷修改备注姓名
29 2278376 高一梦 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
30 2278377 叫什么不重要 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
31 2278380 张赫文 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
32 2278381 霍龙潮 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
33 2278382 刘佳乐 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
34 2278383 赵静华 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
35 2278384 王欢 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
36 2278385 李爽 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
37 2278386 赵丽娟 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
38 2278387 郑晨颖 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
39 2278389 肖冰纯   - 移除该成员设为管理员 考过的答卷修改备注姓名
40 2278390 刘希珣 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
41 2278391 贾慧玲 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
42 2278392 魏颖 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
43 2278393 史昊 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
44 2278395 商梦 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
45 2278396 张灿   - 移除该成员设为管理员 考过的答卷修改备注姓名
46 2278397 高梓萌 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
47 2278399 夏瑞锋 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
48 2278401 田雨轩 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
49 2278402 王文亮 徐水职中 - 移除该成员设为管理员 考过的答卷修改备注姓名
50 2278404 赵子豪 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
51 2278416 马佳佳 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名
52 2278430 李鸿鹏 徐水职教中心 - 移除该成员设为管理员 考过的答卷修改备注姓名 

 

 

 

 

 

 

 

 

班级编号:174978 班级名称:微机76班 创建时间:2016-12-11 14:51 班级个人信息:

序号 编号 姓名/昵称 性别 学校 身份
- 2107570 红色记忆 徐水区职业技术教育中心 创建者
1 2110414 凌世苍穹 徐水区职业技术教育中心 学员
2 2110415 张思琪 徐水区职业技术教育中心 学员
3 2110416 张盼 徐水区职业技术教育中心 学员
4 2110417 崔荣青 徐水区职业技术教育中心 学员
5 2110418 123 徐水区职业技术教育中心 学员
6 2110419 耿千辉 徐水区职业技术教育中心 学员
7 2110420 zhangjiu 徐水区职业技术教育中心 学员
8 2110422 王栋乔 徐水区职业技术教育中心 学员
9 2110423 杨珊 徐水区职业技术教育中心 学员
10 2110424 李悦 徐水区职业技术教育中心 学员
11 2110425 田凯轩 徐水区职业技术教育中心 学员
12 2110426 霍阳 徐水区职业技术教育中心 学员
13 2110427 张伊萌 徐水区职业技术教育中心 学员
14 2110428 张凯丽 徐水区职业技术教育中心 学员
15 2110429 ZhanGXiA 徐水区职业技术教育中心 学员
16 2110430 王家宝 徐水区职业技术教育中心 学员
17 2110431 江静 徐水区职业技术教育中心 学员
18 2110432 詹世聪 徐水区职业技术教育中心 学员
19 2110434 刘毅霖 徐水区职业技术教育中心 学员
20 2110435 高紫旋 徐水区职业技术教育中心 学员
21 2110436 田宇航 徐水区职业技术教育中心 学员
22 2110437 蔡晨江 徐水区职业技术教育中心 学员
23 2110438 项鹏 徐水区职业技术教育中心 学员
24 2110440 李婷 徐水区职业技术教育中心 学员
25 2110441 胡宁 徐水区职业技术教育中心 学员
26 2110443 徐博宇 徐水区职业技术教育中心 学员
27 2110444 闫美玉 徐水区职业技术教育中心 学员
28 2136874 耿千辉 徐水区职业技术教育中心 学员
29 2136917 汪震 徐水区职业技术教育中心 学员
30 2136947 刘小舟 徐水区职业技术教育中心 学员 

 

首页  前一页  后一页  末页
现在是第62页一共有99页