两道高中计算机编程题
发表时间：2024-07-18 07:25:24
来源：网友投稿
1.
privatesubcommand1_click()
dima,b,casinteger
a=val(text1.text):b=val(text2.text):c=val(text3.text)
delta=b^2-4*a*c
ifdelta<0then
msg无解
end
else
text4.text=(-b+sqrt(delta))/2*a
text5.text=(-b-sqrt(delta))/2*a
endsub
2.
PrivateSubcommand1_click()
Dima,b,cAsInteger
a=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text)
Ifa>bAnda>cThen
Ifb>cThen
Form1.Printa,b,c
Else
Form1.Printa,c,b
EndIf
ElseIfb>aAndb>cThen
Ifa>cThen
Form1.Printb,a,c
Else
Form1.Printb,c,a
EndIf
ElseIfc>bAndc>aThen
Ifb>aThen
Form1.Printc,b,a
Else
Form1.Printc,a,b
EndIf
EndIf
EndSub
要用INPUTBOX和MSGBOX就把那几个赋值语句改改咯，你不会这个都不会吧
免责声明：本站发布的教育资讯（图片、视频和文字）以本站原创、转载和分享为主，文章观点不代表本网站立场。
如果本文侵犯了您的权益，请联系底部站长邮箱进行举报反馈，一经查实，我们将在第一时间处理，感谢您对本站的关注！
相关资讯
汽修专业新疆怎么找工作
2025-04-06
机械专业专长怎么写简历
2025-04-06
专科怎么报审计专业的
2025-04-06
专业学科导师类别怎么填
2025-04-06
查报考专业网站怎么查
2025-04-06
水电专业规划怎么写简历
2025-04-06
表演专业怎么留学的好呢
2025-04-06
专业防雷检测怎么收费的
2025-04-06
怎么查询同等学力专业
2025-04-06
高考技能专业怎么选择的
2025-04-06
钢筋套筒专业名称怎么写
2025-04-06
中专怎么填高考志愿专业
2025-04-06
中专统招怎么报志愿专业
2025-04-06
师范专业自我评价怎么写
2025-04-06
景观建筑换专业怎么换好
2025-04-06
建筑专业学生简历怎么写
2025-04-06
推荐资讯
盗墓笔记十年之约讲的是什么故事（盗墓笔记十年之约）
2023-12-17 16:32:22
双手缠满胶布的张桂梅老师，当初成立华坪女高，究竟有多难
2024-07-07 02:08:34
2023年河北读现代农业专业的职教中心有哪些？
2024-07-23 19:26:45
高中生可以考gre吗
2024-08-01 15:51:10
PS怎么改名片模版
2024-08-22 14:37:59
山西太原有什么名胜古迹
2024-10-11 12:38:07
简单办公室电脑系统维护合同详细样本
2024-12-02 06:52:26
鬼谷八荒那片大洲最强
2024-12-03 13:21:16
专业空气净化器怎么样用
2025-04-05 10:13:49
新励学网教育平台
海量全面 · 详细解读 · 快捷可靠
累积科普文章数：18,862,126篇
热门关注
首页
教育
考研
作文
公考
申论
留学
建造
会计
问答
冀ICP备2024091466号