
Private Sub Command 1_Click()
Dim r as single, c as single,
c=2*3.14*r
s=3.14*r*r
Text3 text=str(s)
End sub
print(4 >= 5 or "c" > "a")
Hello
Charlie
Good
Morning
program=["Java","Python","Visual Basic"]
for i in program:
print (i,len(i))
请利用列表实现程序的功能,在划线处将程序补充完整。
mc=(input (“请输入运动会项目名词(1~6):”)) #输入名次,转化为整型
1st=[7,5,4,3,2,1] #定义一个得分列表
if mc>=1 and mc<=6 : #名次在1-6名之间,索引位置
df= #根据索引取列表中相应的成绩
print(“项目得分为:”, )
else:
print(“输入的名次不在[1~6]范围!”)
a = 1
b = 2
a = a + b
c = a + b * 2
程序结果 a= b= c=
| Dim a As Integer Dim b As Integer Private Sub计算_Click( ) a=3 b=5 a= a+b Form1.Print a End Sub |
Num1=3
Num2=4.8
print(Num1,Num2)
a=4
b=6
avg=(a+b)/3
print(avg)