在线等候，明天要考试。帮以下吧

Question

A=3
B=50
DO UNTIL A*B<500 
B=B+25
LOOP
PRINT "B=";B
ENDPrivate Sub Form_Load()Dim a As Integer, b As Integer
a = 3
b = 50
Do Until a * b < 500
b = b + 25
Loop
Debug.Print "B="; bEnd Sub显示：
B=50分析，搞笑，直接就a*b=3*50=150满足条件，推出！估计应该是
Private Sub Form_Load()Dim a As Integer, b As Integer
a = 3
b = 50
Do Until a * b > 500
b = b + 25
Loop
Debug.Print "B="; bEnd Sub显示：B=175

Answer 1

read k
k = 1
from 10 to 1 step -2 loop 5 timesn = 0 + 10 + 8 + 6 + 4 + 2
now m = - 1
n = 30 - 1 = 29

Answer 2

谢谢 w18ily这是练习题不是完整程序，原题出了AB是小写，其他就和我写的一样，答案是45。望指教

Answer 3

ice519(999),45！真的吗？真的是吗？555555555我是不是白学程序了！

Answer 4

Private Sub Form_Load()Dim a As Integer
Dim j As Integera = 0
For j = 1 To 20 Step 2
    a = a + j / 5
Next j
Debug.Print aEnd Sub显示：
20555555555没做对一道！

Answer 5

好了有你说我就放心了，说实话，我做的和你的结果一样。
给答案告没法。
DO 
READ K
FOR M=10 TO K STEP -2
  N=K+M
NEXT M
  PRINT N+M
LOOP WHILE ABS(N+M)<>27
END DATA 1,-2,9,0,-1,9麻烦在简单讲一下，我把分给你

Answer 6

hxnhxx(鸟) 是3，-8，27，?不懂
求解

Answer 7

w18ily(看.net没几天)打出第一个数就死循环了:)~不过老师出题就是想要这个结果~~  3，-8，27

Answer 8

问题是明天考试类似题目如何下手，请说简单点，我是非计算机专业的。
help me :():)(:

Answer 9

程序是不全的，read就是读数，也就是读data给出的那几个，一个一个来。第一次：k=1,向下执行第二次：k=-2，
第三次：k=9，循环到 m+n=27 就跳出来了刚才看错了，没有死循环，正确的。

Answer 10

嘻嘻！楼主，祝你明天顺利通过！ice519(999) ，hxnhxx(鸟) 祝你中秋快乐！

Answer 11

我也想啊w18ily(看.net没几天) 还有hxnhxx(鸟)（） 也祝你中秋节快乐。

Answer 12

FOR M=10 TO K STEP -2
  N=K+M
NEXT M
这层循环和外层循环分开来看，里面循环结束了，外面的才循环一次。外面的循环就是读数用的，整个流程就是：
k=1
FOR M=10 TO K STEP -2
  N=K+M
NEXT M
判断M+N
k=-2
FOR M=10 TO K STEP -2
  N=K+M
NEXT M
判断M+N
k=9
FOR M=10 TO K STEP -2
  N=K+M
NEXT M
M+N=27所以就
跳出来了

Answer 13

k=1 为什么 n+m=3 我循环结构太差

Answer 14

hehe~~想起我学c的时候了5337954   再不会qq

Answer 15

hxnhxx(鸟)我们真有点心有灵犀的感觉，两次同时发贴。
虽然还是没太听懂？(?n+M)。但真的谢谢你

Answer 16

给分了，hxnhxx(鸟)我去下个qq，好久没用了 w18ily(看.net没几天) 你可以给吗？我现在想学计算机了.