Private Sub Command 1_Click()
a=10
for k=1 to 5 Step -1
a=a -k
Next k
Print a, k
End sub
x=5
For i=1 to 10 Step 2
x=x+i
Next i
x=0
for i in range(1,10):
x=x+i
print(x)
n=0
for i in range(1, 30) :
if i%5==0:
n=n+1
print (n)
|
year=2021 if (year%400==0) or ( year%4==0 and year%100!=0 ): days=366 else: days=365 print(days) ⑴程序运行结果是:。 |
a=88 b=48 c=a//b If c==0: c=a*10+b . elif 1<=c<=9: c=a*100+b elif 10<=c<=99: c=a*1000+b print(c) ⑵程序运行结果是:。 |
|
for i in range(1,10,2): print(iend=" ") ⑶程序段执行结果是:。 |
for i in range(1,100): if i%3==0 and i%7==0: print(iend=" ") ⑷程序段执行的结果是:。 |
a=4
s=0
while a>=0:
s=s+a
a=a-1
print(s,a)
i=1
sum=0
while i<=20:
if I %2==0:
sum=sum-i
else:
sum=sum+i
i +=1
print (sum)
s = 0
For i = 1 To 5
s = s + i
Next i
该程序段运行后,i的值为( )
Private Sub Form_Click()
Dim s As Single
Dim i As Integer
s =
For i = 1 ToStep 1
s =
Next i
Print "s="; s
End Sub
| a=0 for i in range(1,100): if i%3==0: a=a+i print(a) |
| a=0 for i in range(1,100): if i%3==0: a=a+1 print(a) |
| a=0 for i in range(0,100,3): a=a+1 print(a) |
| a=0 for i in range(0,99,3): a=a+i print(a) |
s=0
for i=1 to 5
s=s+i
next i
①
②
③
④