| 网站首页 | 小学教案 | 小学课件 | 小学试卷 | 初中教案 | 初中课件 | 初中试卷 | 高中教案 | 高中课件 | 高中试卷 | 选修课程 | 教师考试 | 心理班会 | 素材 | Map | 
师友资源网: 本站域名www.freezl.net,提供自幼儿园到高中各科各类资源免注册高速免费下载。 设为首页 | 加入收藏 |
您现在的位置: 师友资源网 >> 高中课件 >> 高中信息 >> 课件信息

高中信息技术资源导航
高中信技教案 高中信技课件 高中信技试卷
::最近更新资源::
 高中信息技术基础《算法思想:数组与算法》复
 高中信息技术高二PS《海报制作:香水海报》PP
 高中信息技术基础高一《信息的编码》第一课时
 高中信息技术基础高二《算法模式——选择结构
 高一信息技术基础《信息的编码》公开课PPT多媒
 高中信息技术基础高二《算法与程序设计》精品
 高一信息技术基础3.5智能处理PPT多媒体课件免
 高中信息技术基础《初识冒泡排序》优质课PPT多
 高中信息技术《图像处理基本知识》PPT多媒体教
信息技术推荐资源
 高中信息技术基础《算法思想:数组与算法》复习课PP
 高中信息技术高二PS《海报制作:香水海报》PPT多媒体
 高中信息技术基础高一《信息的编码》第一课时PPT多媒
 高中信息技术基础高二《算法模式——选择结构》精品
 高一信息技术基础《信息的编码》公开课PPT多媒体课件
 高中信息技术基础高二《算法与程序设计》精品PPT多媒
 高中信息技术基础《初识冒泡排序》优质课PPT多媒体教
 高中信息技术《图像处理基本知识》PPT多媒体教学课件
 高一信息技术基础3.1文本信息的加工与表达公开课PPT
 高中信息技术4.2EXCEL2003表格信息加工精品PPT多媒体
 高中信息技术4.2表格信息加工最新公开课PPT多媒体教
 高中信息技术4.1文本信息加工最新精品PPT多媒体课件
课件搜索 高级搜索
教学资源本地高速下载地址:
高中信息技术基础《算法思想:数组与算法》复习课PPTX多媒体课件免费下载>>>>>下载地址1  
信息技术相关资源
高中信息技术高二PS《海报制作:香水海报》PPT
高中信息技术基础高一《信息的编码》第一课时P
高中信息技术基础高二《算法模式——选择结构》
高一信息技术基础《信息的编码》公开课PPT多媒
中职中专《神奇的色彩世界——色彩基础知识》优
高中信息技术基础高二《算法与程序设计》精品P
高一信息技术基础3.5智能处理PPT多媒体课件免费
高中信息技术基础《初识冒泡排序》优质课PPT多
新人教版高中语文必修五《宇宙的未来》精品PPT
外研版高中英语BOOK2 Module 5 Newspapers and
外研版高中英语必修三Module 5 Great peole an
高中信息技术《图像处理基本知识》PPT多媒体教
人教新课标版高中英语必修4 Unit 5 Theme park
北师大版高中英语高考总复习模块2 Unit 4 Cybe
2016年高考文科数学《集合的概念与运算》专题复
2016年高中生物必修第4章细胞的物质输入和输出
新人教版政治必修2第八课走进国际社会处理国际
2016年高中物理§2.9实验:练习使用多用电表精
高中物理《实验:练习使用多用电表》公开课说课
高一信息技术基础3.1文本信息的加工与表达公开
信息技术热门资源
 高中信息技术基础高二《算法模式——选择结构》
 高一信息技术基础《信息的编码》公开课PPT多媒
 高中信息技术基础高二《算法与程序设计》精品P
 高一信息技术基础3.5智能处理PPT多媒体课件免费
 高中信息技术基础《初识冒泡排序》优质课PPT多
 高中信息技术《图像处理基本知识》PPT多媒体教
 高一信息技术基础3.1文本信息的加工与表达公开
 高中信息技术4.2EXCEL2003表格信息加工精品PPT
 高中信息技术4.2表格信息加工最新公开课PPT多媒
 高中信息技术4.1文本信息加工最新精品PPT多媒体
 高中信息技术基础期末复习例题与习题讲解分析P
 高中信息技术基础选修《数据结构:线性表》最新
 高中信息技术基础《获取网络信息的策略与技巧》
 高中信息技术基础第六章信息集成与信息交流复习
 高中信息技术基础《IP地址及其管理》最新优质课
 高中信息技术基础《信息技术发展及展望》最新精
 高中信息技术基础《算法及其实现》最新PPT多媒
 高中信息技术基础《信息编码》PPT多媒体课件免
 高中信息技术基础第二章信息获取最新PPT多媒体
 高中信息技术《算法与程序设计:计算机解决问题
::资源内容预览::
资源名称:高中信息技术基础《算法思想:数组与算法》复习课PPTX多媒体课件免费下载


点击下面链接高速下载:
高中信息技术基础《算法思想:数组与算法》复习课PPTX多媒体课件免费下载>>>>>下载地址1  
文件大小: 163 K
添加时间: 2019/1/29 15:33:01
下载次数: 本日: 总计:
资源简介:

算法思想:数组与算法
选择排序:在参加排序数组的所有元素中找出最小(或最大)数据的元素,使它与第一个元素中的数据相互交换位置。然后再在余下的元素中找出最小(或最大)数据的元素,与第二个元素中的数据相互交换位置。以此类推,直到所有元素成为一个有序的序列。具有较高的效率。
二分法查找:在有序的数列中,将要查找的数据与有序数列内处于中间位置的数据进行比较,如果两者相等,则查找成功。否则就根据数据的有序性,在确定该数据的范围应该在数列的前半部分还是后半部分;在新确定的缩小范围内,继续按上述方法进行查找,直到找到要查找的数据,即查找成功,如果要查找的数据不存在,即查找不成功。
基本思想:就是按问题本身的性质,一一列举出该问题所有可能的解,并在逐一列举的过程中(不能遗漏、重复),检验每个可能解是否是问题的真正解,若是,就采纳这个解,否则就抛弃它.
Private Sub Command1_Click()
Dim c As Integer, j As Integer, n As Integer
c = 0
For j = 0 To 99 Step 1
    n = 25006 + j * 10
   If (n Mod 37 = 0) Or (n Mod 67 = 0) Then
          c = c + 1
          List1.AddItem Str(n)
   End If
Next j
Text1.Text = Str(c)
End Sub
基本思想:是指用解析的方法找出表示问题的前提条件与所求结果之间关系的数学表达式,并通过表达式的计算来实现问题求解。
Private sub command1_click( )
  dim m as integer, k as integer,y as integer
  dim x as double
   m=val(text1.text)
   k=val(text2.text)
   x= (k-m)/(0.028*m)
   y=fix(x)
   if  y<x then y=y+1
   text3.text=“存期应为”+str(y)+”年”
End sub

For i = 1 To n-1
         For  j = 1 To n-i
                If d(j) < d(j+1) Then
                    t = d(j)
                   d(j) = d(j+1)
                   d(j-+) = t
                End If
        Next j
 Next i
1.选择排序效率 > 冒泡排序
2.选择排序交换次数<冒泡排序,选择排序每遍最多交换一次,冒泡最多n-1次
3.比较次数相等=  n*(n-1)/2
c = Int(Rnd()*55) +1     
Do while  i<=n  and not flag
    If c = a(i) Then    flag=True
    i = i +1
Loop
 If  flag  Then
      label1.caption = “恭喜” + b(i) + “同学“
 Else
      label1.caption=“没有找到”
 End If
Function(f(n as integer) as long
If n<=1 then
    f=1
Else
    f=n*f(n-1)
End if
End function
Sub command1_click()
Dim nk as long
Dim n as integer
N=val(text1.text)
Nk=f(n)
Text2.text=str(nk)
End sub
Private Sub Form_Load()
 Dim conn As New ADODB.Connection, rs As New ADODB.Recordset
 Dim strsql As String
 conn.ConnectionString = "provider=microsoft.ace.oledb.12.0;data source=" & App.Path & "\count.accdb"
 conn.Open
 strsql = "select * from GDP"
 Set rs.ActiveConnection = conn
 rs.Open strsql
 i = 0
 Do While Not rs.EOF
      i = i + 1
      pv(i) = rs.Fields("pv")              '“pv”字段存储各省(市/自治区)的名称
      gdp(i) = rs.Fields("2013gdp")        '“2013gdp”字段存储各省(市/自治区)的2013年GDP值
      rs.MoveNext
      List1.AddItem pv(i) & "---" & Str(gdp(i))
 Loop
 rs.Close
 conn.Close
 End Sub

温馨提示
本资源 ,点击关键字可以直接在师友资源网上搜索出相关资料。
更多
  网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)发表评论

说明: 如果您发现该软件不能下载,请通知管理员或点击【此处报错】,谢谢!
未经本站明确许可,任何网站不得非法盗链及抄袭本站资源;如引用页面,请注明来自本站,谢谢您的支持!
本站提供的教育资源,仅可用于教育教学以及相关研究,不得用于商业用途。如果侵犯了你的版权,请联系删除。
| 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 | 360网站安全检测平台 | 管理登录 | 
师友资源网| | 免费教学资源高速下载||浙ICP备17044199号-1