《求三角形面积.ppt》由会员分享，可在线阅读，更多相关《求三角形面积.ppt（8页珍藏版）》请在三一文库上搜索。
1、,新高考选考 技术会不会出奇制胜？,技术学科在新高考中，地位直线上升，和其他科目相当。此次全国共有48所211高校的330个专业，都要求选考技术科目。在高校提出选考科目的专业里，选择技术这门科目的占36%，紧跟在物理和化学之后，这种热度多少让人有些意外。 省内高校要选考技术的，有浙江大学的科技与创意设计试验班，浙江财经大学的金融学、法学、软件工程专业等，浙江工业大学的电气通信与计算机类、计算机类等。省外高校要选考技术的，有北京工业大学的经济与贸易类、计算机科学与技术(实验班)、建筑学等，东南大学的物理学类、数学类等。 技术成为七门学科中的一门，地位已经直线上升，现在紧跟在物理、化学后面，更是炙
2、手可热。,技术学科地位的变化从高校看,技术学科地位的变化从普通高中看,从我们学校，甚至从整个天台县来看，技术学科的地位也在发生改变！学校的重视，学生的重视，课时的增加，无不标示着学科地位的上升。 然而处于现在这个过渡时期，学科地位不可能直接等同其他传统主科，需要,界面设计,Text1,Text2,Text3,Label1,Label2,Label3,Label4,command1,算法描述,编写代码,a=Val(Text1.Text) b=Val(Text2.Text) c=Val(Text3.Text),a + b c And a + c b And b + c a,p=(a+b+c)/2
3、S=Sqr(p*(p-a)*(p-b)*(p-c),Label4.Caption=Str(s),MsgBox (你输入的三边不能构成三角形，请重输！),分支结构if语句,If 条件表达式 Then 语句1 Else 语句2,行if语句,块if语句,If 条件表达式 Then 语句1 Else 语句2 End If,没有end if,编写代码,Dim a As Integer, b As Integer, c As Integer, p As Single, s as single,If a + b c And a + c b And b + c a Then Else End If,Private Sub Command1_Click(),End Sub,a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text),p = (a + b + c) / 2 s = Sqr(p * (p - a) * (p - b) * (p - c) Label4.Caption = Str(s),MsgBox (你输入的三边不能构成三角形，请重输！) Label4.Caption = 此处显示结果,