一、请为三角形的面积计算选择合适的程序。(1)PrivateSubForm_load()Leta=Text1.TextLeth=Text2.TextLets=a*h/2LetText3.Text=sEndSub(2)PrivateSubCommand1_Click()Leta=Text1.TextLeth=Text2.TextLets=a*h/2Lets=Text3.TextEndSub（3）PrivateSubCommand1_Click()Leta=Text1.TextLeth=Text2.TextLets=a*h/2LetText3.Text=sEndSub二、写出程序的输出结果，再上机验证。PrivateSubForm_load()Letx=6PrintxLetx=8PrintxLetx=x+1PrintxEndSub三、编写“孙悟空上织女星”程序问题：孙悟空一个筋斗可翻十万八千里，即5.4×104km，织女星距地球约2.3×1014km，那么孙悟空大约要翻多少个筋斗才能到织女星？如果孙悟空每秒钟翻多少筋斗才能到达织女星？如果孙悟空每秒钟翻一个筋斗，那么他要连续不停翻约多少年才能到达织女星？（1）分析问题与确定算法所翻筋斗（秒）数n:n=一年的秒数m（列式）:翻筋斗年数y:(2)初全程序：Rem输入信息Letj=5.4*10^4Letz=Letm=31536000Rem处理信息Letn=z/jLety=Rem输出信息PrintPrint"孙悟空要翻";;"个筋斗才能到织女星"Print"孙悟空要花";y;"年才能到达织女星"
