slide0154.htm
来自「可作为课程设计或者毕业设计 也可以作为学校精品课程网站使用」· HTM 代码 · 共 173 行
HTM
173 行
<html xmlns:v="urn:schemas-microsoft-com:vml"
xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:p="urn:schemas-microsoft-com:office:powerpoint"
xmlns:oa="urn:schemas-microsoft-com:office:activation"
xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">
<meta name=ProgId content=PowerPoint.Slide>
<meta name=Generator content="Microsoft PowerPoint 11">
<link id=Main-File rel=Main-File href="../z6.htm">
<link rel=Preview href=preview.wmf>
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
p\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
v\:textbox {display:none;}
</style>
<![endif]-->
<title>第六章 过程</title>
<meta name=Description content=2008-3-24>
<link rel=Stylesheet href="master04_stylesheet.css">
<![if !ppt]>
<style media=print>
<!--.sld
{left:0px !important;
width:6.0in !important;
height:4.5in !important;
font-size:107% !important;}
-->
</style>
<script src=script.js></script><script><!--
if( !IsNts() ) Redirect( "PPTSld" );
//--></script><!--[if vml]><script>g_vml = 1;
</script><![endif]--><![endif]><o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="160"/>
</o:shapelayout>
</head>
<body lang=ZH-CN style='margin:0px;background-color:black'
onclick="DocumentOnClick()" onresize="_RSW()" onload="LoadSld()"
onkeypress="_KPH()">
<div id=SlideObj class=sld style='position:absolute;top:0px;left:0px;
width:534px;height:400px;font-size:16px;background-color:#E3DDBB;background-image:
url("master04_image001.jpg");clip:rect(0%, 101%, 101%, 0%);visibility:hidden'><p:slide
coordsize="720,540"
colors="#ffffff,#000000,#808080,#482400,#dfd6c3,#d69b80,#993300,#666600"
masterhref="master04.xml">
<p:shaperange href="master04.xml#_x0000_s167937"/><![if !ppt]><p:shaperange
href="master04.xml#_x0000_s167938"/><![if !vml]><img border=0
v:shapes="_x0000_s167938" src="master04_image005.jpg" style='position:absolute;
top:0%;left:0%;width:7.49%;height:100.0%'><![endif]><p:shaperange
href="master04.xml#_x0000_s167940"/><p:shaperange
href="master04.xml#_x0000_s167941"/><![endif]><v:rect id="_x0000_s163842"
href="javascript:parent.GoToPrevSld()" style='position:absolute;left:505pt;
top:498pt;width:53pt;height:30pt;mso-wrap-style:none;v-text-anchor:middle'
filled="f" fillcolor="#dfd6c3 [4]" stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="previousSlide"/></v:rect><v:rect id="_x0000_s163843"
href="javascript:parent.GoToNextSld()" style='position:absolute;left:574pt;
top:496pt;width:53pt;height:30pt;mso-wrap-style:none;v-text-anchor:middle'
filled="f" fillcolor="#dfd6c3 [4]" stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="nextSlide"/></v:rect><v:rect id="_x0000_s163844"
href="javascript:parent.GoToFirst()" style='position:absolute;left:646pt;
top:496pt;width:53pt;height:30pt;mso-wrap-style:none;v-text-anchor:middle'
filled="f" fillcolor="#dfd6c3 [4]" stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="firstSlide"/></v:rect><v:shapetype id="_x0000_t202"
coordsize="21600,21600" o:spt="202" path="m,l,21600r21600,l21600,xe">
<v:stroke joinstyle="miter"/>
<v:path gradientshapeok="t" o:connecttype="rect"/>
</v:shapetype><v:shape id="_x0000_s163845" type="#_x0000_t202" style='position:absolute;
left:60pt;top:36pt;width:636pt;height:467.25pt' filled="f" fillcolor="#dfd6c3 [4]"
stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]"/>
<v:shadow color="gray [2]"/>
<v:textbox style='mso-fit-shape-to-text:t'/>
</v:shape><![if !vml]><map name="map_s5"><area
href="javascript:parent.GoToFirst()" onclick="window.event.cancelBubble=true;"
shape=rect coords="104, 0, 143, 23"><area
href="javascript:parent.GoToNextSld()"
onclick="window.event.cancelBubble=true;" shape=rect
coords="51, 0, 90, 23"><area href="javascript:parent.GoToPrevSld()"
onclick="window.event.cancelBubble=true;" shape=rect
coords="0, 2, 39, 24"></map><![endif]><![if !vml]><img border=0
v:shapes="_x0000_s163842,_x0000_s163843,_x0000_s163844"
src="slide0154_image046.gif" usemap="#map_s5" style='position:absolute;
top:91.75%;left:70.22%;width:27.34%;height:6.25%'><![endif]>
<div v:shape="_x0000_s163845" class=O>
<div style='text-align:justify;mso-line-spacing:"120 0 0";position:absolute;
top:8.5%;left:9.36%;width:86.51%;height:11.5%'><span style='font-family:宋体;
mso-fareast-font-family:宋体'><b>下面编写一查找函数</b></span><span lang=EN-US
style='font-family:"Times New Roman";mso-ascii-font-family:"Times New Roman";
mso-fareast-font-family:"Arial Unicode MS";mso-fareast-language:ZH-CN'><b>Find()</b></span><span
style='font-family:宋体;mso-fareast-font-family:宋体'><b>，若找到</b></span><span
lang=EN-US style='mso-fareast-language:ZH-CN'><b>x</b></span><span
style='font-family:宋体;mso-fareast-font-family:宋体'><b>则返回下标值，找不到返回</b></span><span
lang=EN-US style='font-family:"Times New Roman";mso-ascii-font-family:"Times New Roman";
mso-fareast-font-family:"Arial Unicode MS";mso-fareast-language:ZH-CN'><b>0 </b></span></div>
<div style='text-align:justify;mso-line-spacing:"120 0 0";position:absolute;
top:0%;left:0%;width:.18%;height:.25%'><nobr><span lang=EN-US
style='font-family:"Arial Unicode MS";mso-fareast-font-family:"Arial Unicode MS";
mso-fareast-language:ZH-CN;display:none'><b> </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:26.75%;left:9.36%;
width:86.51%;height:10.75%'><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Private Function Find( a() As Single, x As
Single)<span style='mso-spacerun:yes'> </span>As Integer </b></span></div>
<div style='text-align:justify;position:absolute;top:37.25%;left:9.36%;
width:32.2%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span
style='mso-spacerun:yes'> </span>Dim n%,p%,m% </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:42.5%;left:9.36%;
width:30.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span
style='mso-spacerun:yes'> </span>m=Lbound(a) </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:48.0%;left:9.36%;
width:30.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span
style='mso-spacerun:yes'> </span>n=Ubound(a) </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:53.25%;left:9.36%;
width:30.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span style='mso-spacerun:yes'>
</span>For P=m to n </b></span></nobr></div>
<div style='text-align:justify;mso-line-spacing:"100 20 0";position:absolute;
top:59.75%;left:9.36%;width:60.11%;height:5.5%'><nobr><span lang=EN-US
style='font-family:"Courier New";mso-ascii-font-family:"Courier New";
mso-bidi-font-family:"Courier New";mso-fareast-language:ZH-CN'><b><span
style='mso-spacerun:yes'> </span>IF a(p)=x
then Exit For </b></span></nobr></div>
<div style='mso-line-spacing:"100 20 0";position:absolute;top:66.25%;
left:9.36%;width:86.51%;height:5.25%'><span lang=EN-US style='mso-fareast-language:
ZH-CN'><b><span
style='mso-spacerun:yes'>
</span>Next P </b></span></div>
<div style='text-align:justify;position:absolute;top:71.25%;left:9.36%;
width:38.01%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span style='mso-spacerun:yes'>
</span>If<span style='mso-spacerun:yes'> </span>p>n then<span
style='mso-spacerun:yes'> </span>p=0 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:76.75%;left:9.36%;
width:20.22%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b><span
style='mso-spacerun:yes'> </span>Find=p </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:82.0%;left:9.36%;
width:24.15%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>End Function</b></span><span lang=EN-US
style='font-family:"Courier New";mso-ascii-font-family:"Courier New";
mso-bidi-font-family:"Courier New";mso-fareast-language:ZH-CN'> </span></nobr></div>
<div style='position:absolute;top:88.0%;left:9.36%;width:86.51%;height:4.75%'><span
style='font-family:宋体;mso-fareast-font-family:宋体;mso-special-format:lastCR;
display:none'> </span></div>
</div>
</p:slide></div>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?