4、已知圆球体积为4/3πr³,试编写一个程序,输入圆球半径,经过计算输出圆球的体积。
来源:百度知道 编辑:UC知道 时间:2024/05/31 09:11:49
用VB可以么?
private sub command1_click()
dim r,X,V
command1.caption="开始计算"
label1.caption="请输入球体半径"
r=val("text1.text")
X=4*r*r*r/3
V=X & π
label2.caption="您要求的球体体积为"
text2.text=V
end sub
private sub command2_click()
end
end sub