bt627.pptx

Size: px

Start display at page:

Download "bt627.pptx"

界衫伊
4 years ago
Views:

1 程序

2 1 循环目录 CONTENTS 2 3 动态子程序 4 并行

3 01 循环

4 for n 循环计算该公司员工的薪水总和 (sum 功能 ) B 1 =demo.query("select * from EMPLOYEE") for 1.len() >2=2+1(3).SLRY 1 2 结果

5 for 序列循环计算该公司员工的薪水总和 (sum 功能 ) B 1 =demo.query("select * from EMPLOYEE") for 1 >2=2+3.SLRY 1 2 结果

$=file("e:\\txt\\contract.txt").import@t() 2 =1.$ groups(Client;sum(mount):S_amount).

6 for 条件循环定义销售额达到总销售额一半的客户称为大客户, 请找出这些大客户 B 1 =file("e:\\txt\\contract.txt").import@t() 2 =1.groups(Client;sum(mount):S_amount).sort(-S_amount) 3 =1.sum(mount) for 4<3/2 >B4=B4+1 6 >4=4+2(B4).S_amount 7 >8=8 2(B4).Client 8 9 =2.iterate((10=10 ~.Client,~~+S_amount),0,~~>=3/2)

7 for 空循环从员工中随机找人, 如果超过 30 人或者有 3 个人是纽约州的则停止寻找 B C 1 =demo.query("select * from EMPLOYEE").sort(rand()) 2 [] 0 3 for =1(3) 2 结果 4 if B3.STTE=="New York" >B2=B2+1 5 >2=2 B3.NME 6 if 2.len()>30 break 7 if B2>3 break

8 多重循环, 跳出循环循环找出 1000 之内的水仙花数 B C D E 1 =to(0,9) 2 for 1 if 2==0 next 3 =2*2*2 4 for 1 =B4*B4*B4 5 if B3+C4>(2+1)*100 break 6 if C4>(2+1)*100 break 7 for 1 =C7*C7*C7 8 if D7>(2+1)*100 break C7 9 if D7+B3>(2+1)*100 break 10 if D7+C4>(2+1)*100 break 11 if B3+C4+D7>(2+1)*100 break 12 =2*100+B4*10+C7 13 if B3+C4+D7==D12 >14=14 D 结果

9 02 动态

10 通过宏动态产生表达式的一部分动态某个游戏中, 玩家进行三次随机抽奖, 两次为得分, 一次为运算符, 最终的得分为首次得分与第二次得分经过运算后的得分 B 1 =rand(100)+100 / 第一次得分 2 =rand(10) / 第二次得分 3 [+,-,*,/] / 运算符 4 =3(rand(4)+1) / 抽到的运算符 5 =1${4}2 / 最终得分的结果

11 通过宏引用单元格动态 1~5 记录了 5 个州的人口数,B1~B5 是各州人口的简称, 找到第一个人口数大于 50 万的州 L K Z R C 6 =[1:5].pselect(~> ) 7 =B${string(6)} B 6 7 的结果

12 通过宏引用字段动态将非数值字段的非重复值计算出来 B 1 =demo.query("select * from EMPLOYEE") 2 =1.fname()(1(1).array().(ifnumber(~)).pos@a(false)) 3 for 2 =@ [1.id(${3})] 1 2 结果 B3 的结果

13 宏只解析一次, 不可用于循环函数动态将非数值字段的非重复值计算出来 1 =demo.query("select * from EMPLOYEE") 2 =1.fname()(1(1).array().(ifnumber(~)).pos@a(false)) 3 =2.(1.id(${2.~})) 4 =2.(1.id(eval(2.~))) 此时应该使用 eval() 生成表达式, 可以多次解析, 得到正确寄过 3 4 结果

14 eval() 公式转换成表达式并计算结果 : 动态现有数据如下 : 新增一列生成计算结果 1 =file("e:/txt/expression.txt").import@t() 2 =1.derive(eval(replace(expression,"X","*")):res) 1 2 结果

15 eval() 引用函数动态员工信息存储在 Excel 文件中, 请将员工信息整理成结构化数据, 员工信息如下 : B C 1 =file("e:/txt/employee_info.xlsx").xlsopen() 2 =create(eid, Name, Gender, Position, Birthday, Phone, drr, ZipCode ) 3 [B,B,D,B,B,B,B,B] /excel 中存放员工信息的列 4 [1,2,2,3,4,5,6,7] /excel 中存放员工信息的行 5 for =3.(~/4(#)) / 对位组合行列, 组成单元格 6 =B5.(eval("1.xlscell("/~/")")) / 将字符串解析成表达式 7 if len(b6(1))==0 break 8 >2.record(B6) / 记录录入表中 9 >4=4.(~+8) / 录入下一名员工 2 结果

$.(~<sum(?\\~))&&?.(~>0)==?$ .len().

16 eval() 在生成的表达式时可以使用参数, 实现类似自定义函数的功能动态例 : 筛选出可以组成三角形的序列 1 =10.(3.(rand(10))) 2 =1.select(eval("if(?.(~>0)==?.(~<sum(?\\~))&&?.(~>0)==?.len().(true))",~)) 1 2 结果注意 : eval() 在解析的时候速度慢, 所以在用的时候优先使用宏

17 03 子程序

func 子程序随机生成两个字母作为产品简称, 随机生成 3-6 位 id 作为客户简称, 创建

run(id=id+char(65+rand(26))) 4 return id 5 func 6

insert(0,B11,5,B5,B7) 9 =5.(func(1,2)) 10 =10.

=create(id,product,customer,amount) 向右填充 12 >100.

18 func 子程序随机生成两个字母作为产品简称, 随机生成 3-6 位 id 作为客户简称, 创建 ID 产品客户销售额表 B 1 func / 生成 ID 2 >id="" 3 >1.run(id=id+char(65+rand(26))) 4 return id 5 func 6 >B11=B =(rand(1000)+1)*100 8 >11.insert(0,B11,5,B5,B7) 9 =5.(func(1,2)) 10 =10.(func(1,rand(3)+3)) 11 =create(id,product,customer,amount) 向右填充 12 >100.(func(5,9(rand(5)+1),10(rand(10)+1))) 9 结果 10 结果 11 结果 SPL 允许 func 内部引用外部单元格, 如 11 是 func 外部的单元格

19 跨网格调用子程序三个网格子程序 createid.dfx findnames.dfx 1 / 生成 ID 2 ="" 3 >size.run(2=2+char(65+rand(26))) 4 return 2 1 / 生成 Pname 和 CName 2 =rand(pnames.len())+1 3 =rand(cnames.len())+1 4 return PNames(2),CNames(3) addrecord.dfx 1 /add a record 2 =Table.len()+1 3 =(rand(1000)+1)*100 4 >Table.insert(0,2,PNME,CNME,3)

$call 函数调用其他网格程序子程序 1 =5.(call("E:\\esproc_test\\createid.$ $(call("E:\\esproc_test\\createid.dfx ",rand(3)+3)) / 调用 createid.$ dfx",1,2)) / 调用 findnames.

20 call 函数调用其他网格程序子程序 1 =5.(call("E:\\esproc_test\\createid.dfx ",2)) / 调用 createid.dfx, 生成产品简称 2 =10.(call("E:\\esproc_test\\createid.dfx ",rand(3)+3)) / 调用 createid.dfx, 生成客户简称 3 =100.(call("E:\\esproc_test\\findnames.dfx",1,2)) / 调用 findnames.dfx, 产生 [ 产品, 客户 ] 序列 4 =create(id,product,customer,amount) / 创建空表 5 >3.(call("E:\\esproc_test\\addrecord.dfx",4,~(1),~(2))) / 调用 addre.dfx, 向 4 表逐条插入数据 1~4 结果

递归实际应用中, 我们经常遇到需要使用递归的问题先看个简单的例子 : 计算 5 的阶乘 B 1

:func(5)=5*func(4) 第二步 :func(4)=4*func(3) 第三步

21 递归实际应用中, 我们经常遇到需要使用递归的问题先看个简单的例子 : 计算 5 的阶乘 B 1 func return if(1<=0,1,1*func(1,1-1)) 2 =func(1,5) 2 结果递归规律 :n!=n*(n-1)! 递归出口 : 如果 n<=0, 返回 1 输入 :x=5 第一步 :func(5)=5*func(4) 第二步 :func(4)=4*func(3) 第三步 :func(3)=3*func(2) 第四步 :func(2)=2*func(1) 第五步 :func(1)=1*func(0) 第六步 :func(0)=1 结果 :5*4*3*2*1=120 递归过程

22 递归欧几里得算法求解两个数的最大公约数递归过程 B 1 func 2 =1%B1 3 return if(b2==0,b1,func(1,b1,b2)) 4 =func(1,4557,5115) 输入 :a=4557,b=5115 第一步 :func(4557,5115)=func(5115,5115%4557) 第二步 :func(5115,558)=func(558,5115%558) 2 结果递归规律 :a b 最大公约数 =b b%a 的最大公约数递归出口 : 如果余数为 0, 则取除数第三步 :func(558,93)=93 结果 :93

$len(),b2=b2 1.m(i:)) 7 return B2 8 func if 8.len()<=1 return 8 9 =int(8.len()\2) 10 =func(8,8.m(:b9)) 11 =func(8,8.$

23 递归方法实现归并排序递归 B C 1 func 2 =[] 3 >i=j=1 4 for (i<=1.len()&&j<=b1.len()) >if(1(i)<b1(j),(b2=b2 1(i),i=i+1),(B2=B2 B1(j),j=j+1)) 5 if(i==1.len(),b2=b2 B1.m(j:)) 6 if(j==b1.len(),b2=b2 1.m(i:)) 7 return B2 8 func if 8.len()<=1 return 8 9 =int(8.len()\2) 10 =func(8,8.m(:b9)) 11 =func(8,8.m(b9+1:)) 12 return func(1,b10,b11) 13 =func(8,[2,1,3,4,8,12,7,7]) 13 结果

24 递归过程递归分解过程 left [2,1,3,4,8,12,7,7] right left [2,1,3,4] [8,12,7,7] right left right 递归规律 : 递归出口 :? [2,1] [3,4] [8,12] [7,7] left right left right left right left right [2] [1] [3] [4] [8] [12] [7] [7] [1,2] [3,4] [8,12] [7,7] [1,2,3,4] [7,7,8,12] 归并过程 [1,2,3,4,7,7,8,12]

$4 =file("d:\\result.$ txt").

25 call 函数实现递归递归读取多级目录递归文件目录 B 1 =directory@p(path) / 列出目录下文件名的全目录 2 =1.(file(~).import()) / 导入根目录文件 3 =2.conj() / 合并结果文件内容 4 =file("d:\\result.txt").export@a(3) / 导出到文件 5 =directory@dp(path) / 列出目录下的目录 6 >5.(call("E:/esproc_test/readfiles.dfx",~)) / 递归调用本脚本

26 04 并行

27 fork 并行多线程找出 Sales,R&D,Finance,Production 这四个部门年龄最大的员工 B 1 $(demo) select * from EMPLOYEE [Sales,R&D,Finance,Production] 2 fork B1 =1.select(DEPT==2) 3 =B2.minp(BIRTHDY) 4 return B3 2 结果

28 统计哈利波特小说所有单词的数量 (wordcount) 并行 B 1 =directory@p("d:/test/harry Potter") =now() 2 for 1 =file(2).read().words() 3 =@ [B2.groups(lower(~):Word;count(~):Count)] 4 =B3.merge(Word) 5 =4.groups@o(Word;sum(Count):Count).sort@z(Count) 6 =interval@ms(b1,now()) 小说文件 5 6 结果

29 统计哈利波特小说所有单词的数量 (wordcount) 并行 fork 多线程 B 1 =directory@p("d:/test/harry Potter") =now() 2 fork 1 =file(2).read().words() 3 =B2.groups(lower(~):Word;count(~):Count) 4 =2.merge(Word) 5 =4.groups@o(Word;sum(Count):Count).sort@z(Count) 6 =interval@ms(b1,now()) 5 结果

30 for 并行从数据库取出 Sales,Marketing 和 Production 部门的员工 B 1 [Sales,Marketing,Production] 2 =now() 3 for 1 =connect("demo") 4 =@ B3.query@x("select * from EMPLOYEE where DEPT=?",3) 5 =interval@ms(2,now()) B4 5 结果

31 fork 多线程并行从数据库取出 Sales,Marketing 和 Production 部门的员工 B 1 [Sales,Marketing,Production] 2 =now() 3 fork 1 =connect("demo") 4 =B3.query@x("select * from EMPLOYEE where DEPT=?",3) 5 =3.conj() 6 =interval@ms(2,now()) 5 6 结果

32 THNKS 感谢聆听批评指导

2014教师资格证考试《中学综合素质》仿真模拟题(4)

2014教师资格证考试《中学综合素质》仿真模拟题(4) 2016 教师资格证考试中学综合素质仿真模拟题 (4) 一单项选择题 ( 在每小题列出的四个备选项中只有一个是符合题目要求的, 错选多选或未选均不得分本大题共 29 小题, 每小题 2 分, 共 58 分 ) 1. 教师要具有符合时代特征的学生观