《上海市高中信息技术 课题顺序结构-交换算法(二)》由会员分享,可在线阅读,更多相关《上海市高中信息技术 课题顺序结构-交换算法(二)(3页珍藏版)》请在金锄头文库上搜索。
上海市高中信息技术 课题顺序结构-交换算法(二)课题:顺序结构-交换算法(二)BBAA=A+BB=A-BA=A-B46441010666试想一下:加减法可以,那么乘除法可不可以?程序设计:Private Sub Command1_Click()实现单向交换,也就是单方向的数据传递 Text2.Text = Text2.Text & Text1.TextEnd SubPrivate Sub Command2_Click() Text1.Text = Text1.Text & Text2.TextEnd SubPrivate Sub Command3_Click()Text1.Text和Text2.Text也相当于变量a,b。现在需要再声明X用于交换。 Dim x As Stringx = Text1.TextText1.Text = Text2.Text Text2.Text = xEnd SubCommand2Command1Command3学生出现的问题:赋值语句方向错误;文本框输入的数据为字符型数据,没有这个概念;二、已知三边长,求面积abc已知的三条边a,b,c的长度根据数学方法,先求半周长:p=(a+b+c)/2再根据海伦公式计算:3 / 3