假定消费C=1000+0.8Yd，投资I=150-6r，税收T=50和政府购买G=40，从而IS方程是Y=1250-30r，名义货币供给M=150，货币需求L=0.20Y-4r，当价格水平P=100%时，LM方程是Y=750+20r；当价格水平P=120%时，LM方程是Y=625+20r；当价格水平P=150%时，LM方程是Y=500+20r。假定IS曲线不变，但货币需求对利润更敏感时，比方说L=0.20Y-4r变为L=0.20Y-10r时，总需求曲线斜率有何变化？
假定消费C=1000+0.8Yd，投资I=150-6r，税收T=50和政府购买G=40，从而IS方程是Y=1250-30r，名义货币供给M=150，货币需求L=0.20Y-4r，当价格水平P=100%时，LM方程是Y=750+20r；当价格水平P=120%时，LM方程是Y=625+20r；当价格水平P=150%时，LM方程是Y=500+20r。假定IS曲线不变，但货币需求对利润更敏感时，比方说L=0.20Y-4r变为L=0.20Y-10r时，总需求曲线斜率有何变化？
相关考题：
有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。
以下能够正确计算n!的程序是（ ）。A．Private Sub Command1_Click（）n=5: x=1Dox=x * II=I + 1Loop While I nPrint xEnd SubB．Private Sub Command1_Click（）n=5: x=1: I=1Dox=x * II=I + 1Loop While I nPrint xEnd SubC．Private Sub Command1_Click（）n=5: x=1: I=1Dox=x * II=I + 1Loop While I =nPrint xEnd SubD．Private Sub Command1_Click（）n=5: x=1: I=1Dox=x * II=I + 1Loop While I nPrint xEnd Sub
有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)＝2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(i)＝5 a(2)＝6 a(3)＝7 a(4)＝8 subP a() For i＝1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为______。A． 2 4 6 8B．5 6 7 8C．10 12 14 6D．出错
有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subPa() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为( )A．2 4 6 8B．5 6 7 8C．10 12 14 16D．出错
阅读程序： Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为。
以下能够正确计算n!的程序是A．Private Sub Command1 Click() n=5：x=1 Do x=x * I I=I + 1 Loop While I ＜ n Print x End SubB．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X*I I=I + 1 Loop While I ＜n Print x End SubC．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X * I I=I + 1 Loop While I＜=n Print X End SubD．Private Sub Command1_Click() n=5：X=1：I=1 Do x=x * I I=I + 1 Loop While I＞n Print X End Sub
以下程序的运行结果是( ) #define MAX 10 int a[MAX]，i; main() { printf("\n");sub1()；sub3(A) ,sub2()，sub3(A) ； } sub2() { int a[MAX]，i，max； max=5； for(i=0；i＜max；i++)a[i]＝i； } sub1() {for(i=0;i＜MAX；i++)a[i]＝i+i; } sub3(int a[]) { int i; for(i=0;i＜MAX，i++)printf("%d"，a[i])； printf("\n")； }A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18
下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }A．6B．7C．8D．9
设有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%) Dim I％ For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21，64，92，15，72，38，45，72) Call search(b， 45， n) Print n End Sub 程序运行后，输出的结果是A．2B．6C．10D．12
在窗体上画一个名称为CoilTlilandl的命令按钮，然后编写如下事件过程： Private Sub command1 Click() Dim m As Integer， i As Integer， x(3)As Integer For i=0 To 3：x(i)=i：Next i For i = 1 To 2： Call sub1(x，i)：Next i For i = 0 To 3： Print x(i)；： Next i End Sub Private Sub sub1(a()As Integer，k As Integer) Dim i As Integer Do a(k)=a(k)+a(k+1) j = j + 1 Loop While j ＜ 2 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．0 3 7 5B．0 1 2 3C．3 2 4 5D．0 5 8 3
有过程如下：Sub fact (m As Integer, total As Long) Dim i As Integer total = 1 for i = 1 To m total = total*i Next iEnd Sub调用它的事件过程如下：Private Sub Command1_ Click () Dim tot As Long Dim a As Integer a = Val InputBox (“请输入数据”)) Call fact (a, tot) Print totEnd Sub则输入数据5，运行结果为 ______。A．100B．120C．200D．50
假定有如下的Sub过程：Sub Sub1(x As Single，y As single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_click()Dim a As SingleDim b As Singlea=5b=4Sub1 a，bPrint a；bEnd Sub程序运行后，单击命令按钮，输出结果为A．B．C．D．
以下能够正确计算1+2+3+…+10的程序是A．Private Sub Command1_Click() Sum=0 ForI=1 To 10 Sum=Sum+I Next I Print Sum End SubB．Private Sub Command1_Click() Sum=0，I=1 Do While I＜=10 Sum=Sum+I I=I+1 Print Sum End SubC．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop Until I＜10 Print Sum End Sub
编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是A．rehcaetB．tahreeeC．themeeD．eerthea
有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。A． 2 4 6 8B．5 2 2 2C．10 12 14 16D．出错
在窗体上画一个命令按钮，然后编写如下事件过程： Sub BTC(old Copy( ) As Integer，new Copy( ) As Integer) Dim i AS Integer For i=LBound(oldCopy( ))To UBound(oldCopy( )) newCopy(i)=oldCopy(i) Next i End Sub Private Sub Command1 _ Click( ) Dimm(10) As Integer，n(10)As Integer For i=1 To 10 m(i) =i*i Next i Call BTC(m，n) Print n(5) End Sub 程序运行后，单击命令按钮输出结果为A．0B．2C．10D．25
编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后，单击窗体，则窗体上显示的内容是A．6B．12C．24D．47
以下能够正确计算n!的程序是______。A．Private Sub Commeadl_Click() n=5: x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop Whilei＜=n Print x End SubD．Private Sub Commsndl_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
以下能够正确计算n!的程序是( )。A．Pfivate Sub Commgld1_LClick() n=5:x=1 Do x=x*1 i=i+1 Loop Whilei＜nB．Private Sub Command1_Click() n=5:x=1:i=1 Do x=x*1 i=i+1 Loop Whilei＜n Print x End SubC．Pfivate Sub Command1_ C1ick() n=5:x=1:i=1 Do X=X*1 i=i+1 Loop While i＜=nD．Private Sub Command1_C1ick() n=5:x=1:i=1 Do X=X*1 i=i+1 Loop While i＞n Print x End Sub
以下能够正确计算n!的程序是( )。A．Private Sub Commandl_C1ick()B．hiVate Sub Commandl_C1ick() n＝5:x＝1 n＝5:x=1:i＝1 DO DO X＝x*1 X＝X*1 i＝i＋1 i＝i＋1 Loop while i＜n Loop While＜n Print x Ptinte x End Sub End SubC．Private Sub Commandl_Click ()D．Pdvate Sub Commandl C1ick() n＝5:X＝1:i＝1 n＝5＝:x＝1:i＝1 DO DO X＝X*1 X＝X*1 i＝i＋1 i＝i＋1 Loop While i＞n Print x Print x End Sub End Sub
阅读程序 SUB P(B( ) AS INTEGER) FOR I=1 TO 4 B(I) =2*I NEXT I END SUB PRIVATE SUB COMMAND1_CLICK( ) DIM A( 1 TO 4) AS INTEGER A(1)=5 A(2) =6 A(3) =7 A(4) =8 P A( ) FOR I = 1 TO 4 MSGBOX A(I) NEXT I END SUB 运行上面的程序，单击命令按钮COMMAND1后，消息框4次输出的内容分别是( )。A．出错B．10, 12, 14, 16C．5, 6, 7, 8D．2, 4, 6, 8
class Super { public int i = 0； public Super（String text） { i = 1； } } public class Sub extends Super { public Sub（String text） { i = 2； } public static void main（String args[]） { Sub sub = new Sub（“Hello”）； System.out.println（sub.i）； } } What is the result？（） A、 0B、 1C、 2D、 Compilation fails.
单选题class Super { public int i = 0； public Super（String text） { i = 1； } } public class Sub extends Super { public Sub（String text） { i = 2； } public static void main（String args[]） { Sub sub = new Sub（“Hello”）； System.out.println（sub.i）； } } What is the result？（）A 0B 1C 2D Compilation fails.
单选题class super （ public int I = 0； public super （string text） （ I = 1 ） ） public class sub extends super （ public sub （string text） （ i= 2 ） public static void main （straing args） （ sub sub = new sub （“Hello”）； system.out. PrintIn（sub.i）； ） ） What is the result？（）A Compilation will fail.B Compilation will succeed and the program will print “0”C Compilation will succeed and the program will print “1”D Compilation will succeed and the program will print “2”