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
m= 1 m = m+ 5 n = 5 + m Print n ,m |
a = 2 b = 3 print a > b |
a=10 b=20 If a>b then Print a, b Else Print b, a End if |
For k=15 to 1 step -5 Print k; next |
a=32
b=14
c=a%b
print(c)
x=3.772
y=-8
x=int (x) +abs (y)
print (x)
Num1=5
Num2=4
Num1=Num2
print(Num1,Num2)
Num=23
result=Num%3+5
print(result)
a=5
b=2
c=3
d=(a*b)%c
print(d)
Num=53
result=Num%5
print(result)
Num1=11
Num2=29
Sum=Num1+Num2
print(Num1,"+",Num2,"=",Sum)
a=input( )
b=input()
c=a+b
print (c)
Num1=4.1
Num2=5.8
age=(Num1+Num2)/2
a=100
b=200
_______________
print(a,"+",b,"=",c)
str1="key"
str2="board"
print( str1+str2 )
a=5
b=3
print(a*b)
Num=123
temp1=Num%10
temp2=Num%100
print(temp1,temp2)
x=10
y=3
Print(x%y,x**y)
a2=int(input ("请输入自然数:"))
p=int(a1/a2+a1*a2) print(p)
假如输入15和5,结果是( )
Am=['书法','绘画','体育'] m.append('歌唱')
m.append('舞蹈')
print("与体能有关的项目是:",m[2])