求三角形面积VIP专享VIP免费

新高考选考技术会不会出奇制胜？技术学科在新高考中，地位直线上升，和其他科目相当。此次全国共有48所211高校的330个专业，都要求选考技术科目。在高校提出选考科目的专业里，选择技术这门科目的占36%，紧跟在物理和化学之后，这种热度多少让人有些意外。省内高校要选考技术的，有浙江大学的科技与创意设计试验班，浙江财经大学的金融学、法学、软件工程专业等，浙江工业大学的电气通信与计算机类、计算机类等。省外高校要选考技术的，有北京工业大学的经济与贸易类、计算机科学与技术(实验班)、建筑学等，东南大学的物理学类、数学类等。技术成为七门学科中的一门，地位已经直线上升，现在紧跟在物理、化学后面，更是炙手可热。技术学科地位的变化—从高校看技术学科地位的变化—从普通高中看从我们学校，甚至从整个天台县来看，技术学科的地位也在发生改变！学校的重视，学生的重视，课时的增加，无不标示着学科地位的上升。然而处于现在这个过渡时期，学科地位不可能直接等同其他传统主科，需要界面设计Text1Text2Text3Label1Label2Label3Label4command1算法描述开始输入a,b,c值两边之和大于第三边结束输出三角开面积输出警告语句计算三角形面积YN?编写代码开始输入a,b,c值两边之和大于第三边结束输出三角开面积输出警告语句计算三角形面积YN?a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)a+b>cAnda+c>bAndb+c>ap=(a+b+c)/2S=Sqr(p*(p-a)*(p-b)*(p-c))Label4.Caption=Str(s)MsgBox("你输入的三边不能构成三角形，请重输！")分支结构－－if语句IfIf条件表达式条件表达式ThenThen语句语句11ElseElse语句语句22行行ifif语语句句块块ifif语语句句IfIf条件表达式条件表达式ThenThen语句语句11ElseElse语句语句22EndIfEndIf没有endif编写代码DimaAsInteger,bAsInteger,cAsInteger,pAsSingle,sassingleIfa+b>cAnda+c>bAndb+c>aThenElseEndIfPrivateSubCommand1_Click()EndSuba=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)p=(a+b+c)/2s=Sqr(p*(p-a)*(p-b)*(p-c))Label4.Caption=Str(s)MsgBox("你输入的三边不能构成三角形，请重输！")Label4.Caption="此处显示结果"