计算机信息加工的类型及举例,3.1.2计算机信息加工的过程和类型

《3.1.2计算机信息加工的过程和类型》由会员分享，可在线阅读，更多相关《3.1.2计算机信息加工的过程和类型(23页珍藏版)》请在人人文库网上搜索。

1、信息的编程加工,莆田锦江中学 陈贞贞,什么是编程,编程，就是让计算机代为解决某个问题，对某个计算体系规定一定的运算方式，是计算体系按照该计算方式运行，并最终得到相应结果的过程。,分析问题,编程加工第一步：,来，计算机来帮我解决下这个 问题,什么问题？,有两个杯子 A、 B，分别盛放蓝墨水和红墨水，要求它们里面的墨水互换，能实现吗？,思考1：,编程加工第二步：,设计算法,再给你一个杯子C能实现吗？请分析一下问题并给出操作步骤。,可视化设计(前台)-交互界面,代码编程(后台),可分为两大部分：,绘制控件对象 设置对象的属性,VB简介,窗体,工 具 箱,属性窗口,工程资源 管理器,Print (“ 。

2、”) Msgbox (“ ”),试一试,创建一个简单应用程序，单击命令按钮，会出现你太棒了 消息。,编程绘制 y=x2 的函数图像,“描点法”手工绘制步骤：,第一步 准备好绘图工具；,第二步 绘制坐标系的横轴与纵轴；,第三步 依据要绘图的函数表达式， 选择几个自变量的值算出相 应的因变量值，得到一组坐 标点；,第四步 在坐标系上描出这几个点， 尽量光滑地描点连线。,设计算法,计算机编程绘制函数图像的过程：,第一步 选择计算机程序设计语言；,第二步 绘制坐标系；,第三步 根据函数表达式计算所要描 点的坐标；,第四步 在坐标系上描点成像。,设计算法,让我们一起来码代码,认识代码,Private S。

3、ub Command1_Click() 确定按钮单击事件 Dim x, y As Single picture1.Scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 y = x 2 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub 结束程序,认识代码,Private Sub Command1_Cl。

4、ick() Dim x, y As Single 定义x,y两个变量 picture1.Scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 y = x 2 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub,认识代码,Private Sub Command1_Click() Dim x, y As 。

5、Single picture1.Scale (-10, 25)-(10, -25) 定义坐标系 picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 y = x 2 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub,(-10，25),(10，-25),Private Sub Command1_Click() Dim x, y As Single pi。

6、cture1.Scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) 画横坐标轴，颜色为蓝色 picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 y = x 2 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub,(-10，0),(10，0),编写代码,编程加工第三步：,认识代码,Private Sub Command1_Click() Dim x, y。

7、 As Single picture1.scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) 画纵坐标轴，颜色为蓝色 For x = -10 To 10 Step 0.0001 y = x 2 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub,(0，25),(0，-25),认识代码,Private Sub Command1_Click() Dim x, y 。

8、As Single picture1.Scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 y = x 2 用循环语句描点画函数图像 picture1.PSet (x, y), RGB(255, 0, 0) Next x End Sub,认识代码,Private Sub Command1_Click() Dim x, y As Single pictu。

9、re1.Scale (-10, 25)-(10, -25) picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) For x = -10 To 10 Step 0.0001 x值从-10变化到10，每次增量为0.0001 y = x 2 计算y值 picture1.PSet (x, y), RGB(255, 0, 0) 用红色描出坐标为(x,y)的点 Next x 取下一个x值 End Sub,此线由二十万个点组成,无论是手工绘制还是编程实现，其本质都是“描点法”。,编程加工第四步：,调试运行,通过调试和运行编写好的代码，发现并修改其中的错误,信息编程加工的四个步骤,分析问题,设计算法,编写代码,调试运行,请在原程序上进行修改，看看哪个同学能画出更多函数图像？,如何绘制如下函数图像？,给出画圆语句，你能画出更多图形吗？,画线语句：Line(x1,y1)-(x2,y2),colorBF 画点语句：PSet(x,y), color 画圆语句：Circle(x,y),r, color 填充颜色： FillColor = color FillStyle = 0(1为透明) 清除窗体：Cls。