Private Sub Form_Click( )
Dim a, b, c, s As Integer
a=9
b=41
c=2*(a+b)
s=a*c
Private Sub Form_Click( )
Dim a As Integer, b As Integer
If a>b Then
a=a-b
Else
a=b+a
End if
Print a
Private Sub Form_Click( )
Dim x As Integer, a As Integer
x=0
a=0
For j=1 to 5
a=a+j
Next j
x=j
Print x, a
End Sub
Private Sub Form_Click( )
Dim x As Integer
x=0
Do While x<50
x=(x+2)*(x+3)
n=n+1
Loop
Print x,n
End Sub
a=32
b=14
c=a%b
print(c)
x=3.772
y=-8
x=int (x) +abs (y)
print (x)
Dim a As Integer, b As Integer
a=6
b=8
S=1+a*b/2
Print S
Num1=9
Num2=14
age=(Num1+Num2)/2
print(age)
Num=53
result=Num%5
print(result)
Num=123
temp1=Num%10
temp2=Num%100
print(temp1,temp2)
a=4
b=6
avg=(a+b)/3
print(avg)
Num1=4.1
Num2=5.8
age=(Num1+Num2)/2
x=int(10.5)*10
x=10
y=x/5
print(y)
x=10
y=3
Print(x%y,x**y)
a1=int(input("请输入自然数:")
a2=int(input("请输入自然数:")
p1=a2
p2=int(a1*a2)
p3=int(a2/a1+a1*a2)
print(p1, p2, p3)
a1=int(input ("请输入自然数:"))
a2=int(input ("请输入自然数:"))
p=int(a1*a2)
print(p)
假如输入5和6,结果是( )
Am=['书法','绘画','体育'] m.append('歌唱')
m.append('舞蹈')
print("与体能有关的项目是:",m[2])