有如下程序：
Print Sub Form_Click（）
a=70
For j=1To 3
x=Val（InputBox（""请输入一个数""））
If x Mod 3=0Then
b=b+x
a=x
Else
b=b+a
End If
Next j
Print b
End Sub
运行时输入6，7，8输出结果是（）。

有如下程序：
Print Sub Form_Click（）
M=1
N=1
Do While M< 10
M=2*N+M
Loop
Print M
End Sub
该程序的输出结果是（）。

有如下程序：
Print Sub Form_Click（）
K=4：Num=0
Do
K=（K-1）*（k-2）
Num1=Num1+1
Loop Until K>=100
Print Num1；K
End Sub
该程序的输出结果是（）。

有如下程序：
Print Sub Form_Click（）
X=1：Y=1
For J=1To 3
X=X-Y：Y=Y+X
Next J
Print X；Y
End Sub
该程序的输出结果是（）。