原创力文档- 1、本文档共37页，其中可免费阅读12页，需付费20金币后方可阅读剩余内容。
- 2、本文档内容版权归属内容提供方，所产生的收益全部归内容提供方所有。如果您对本文有版权争议，可选择认领，认领后既往收益都归您。
- 3、本文档由用户上传，本站不保证质量和数量令人满意，可能有诸多瑕疵，付费之前，请仔细先通过免费阅读内容等途径辨别内容交易风险。如存在严重挂羊头卖狗肉之情形，可联系本站下载客服投诉处理。
- 4、文档侵权举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
》》》》》》历年考试真题《《《《《《
1输入半径,求圆面积和球体积。
PrivateSubForm_Load()
DimrAsSingle,sAsSingle,vAsSingle
rInputBox(请输入半径r：,输入数据)
s3.14*r^2
v4/3*r^3*3.14
Print圆面积为:;s
Print球体积为:;v
MsgBox(圆面积为:sSpace(2)球体积为:v)
EndSub
2输入两个数存放在x和y中，比较大小，保证大数放在x中，小
文档评论（0）