00089国际贸易
设A、B两国对商品X的供求曲线相同，为： SA＝SB＝150＋20P，DA＝DB＝200－20P C国不生产X，只能从A、B两国进口，其国内需求为： DC＝100－20P （1）求在自由贸易条件下，商品X的国际价格及各国的贸易量； （2）如果A、B两国同时对C国实行贸易制裁，不向其出口，求和自由贸易相比，各国的福利变化情况。 （3）如果A国单独对C实施制裁措施，不向其出口，求A、B、C三国的福利变化情况，这时A国的制裁措施是明智之举吗？为什么？
题目
设A、B两国对商品X的供求曲线相同，为： SA＝SB＝150＋20P，DA＝DB＝200－20P C国不生产X，只能从A、B两国进口，其国内需求为： DC＝100－20P （1）求在自由贸易条件下，商品X的国际价格及各国的贸易量； （2）如果A、B两国同时对C国实行贸易制裁，不向其出口，求和自由贸易相比，各国的福利变化情况。 （3）如果A国单独对C实施制裁措施，不向其出口，求A、B、C三国的福利变化情况，这时A国的制裁措施是明智之举吗？为什么？
相似问题和答案
第1题：
设X是整型变量，与函数IIf(x>0，-x，x)有相同结果的代数式是（ ）。
A.
B.X
C.
D.-
E.X
F.
G.X
H.-X
B。【解析】IIf函数可以用来执行简单的条件判断操作，它是“If…Then…Else”结构的简写版本，是“ImmediateIf”的缩略。其格式如下：IIf(条件，True部分，False部分)，“条件”是一个逻辑表达式。当“条件”为真时，IIf函数返回“True部分”，否则返回“False部分”。“True部分”或“False部分”可以是表达式、变量或其他函数。该函数与C语言中的三目运算符“?：”功能相似，可以使程序大为简化。本题中当输入的x大于0时，返回-x的值，当X为负数时，不符合条件，返回x本身，因为x本身就是负数，所以本题两种条件下返回的都一定是负值，本题答案为B选项。
第2题：
设A、B两国对X商品的供求曲线相同，为：SA=SB=150+20P DA=DB=200-20P C国不生产X，只能从A、B两国进口，其国内需求为：DC=100-20P
⑴求在自由贸易的条件下，商品X的国际价格及各国的贸易量。
⑵如果A、B两国同时对C国实行贸易制裁，不向其出口，求和自由贸易相比，各国的福利变化情况。
⑶如果A国单独对C国实施制裁措施，不向其出口，求A、B、C三国的福利变化情况。这时A国的制裁措施是明智之举吗?为什么?
但世界X产品的总需求则由A、B、C三国的需求组成，
所以D=DA+DB+DC=500-60P
⑴显然，在自由贸易的条件下，S=D，由此的商品X的国际价格P=2。
在P=2时，C国进口60单位的X，A、B两国各出口30单位X。
⑵如果A、B两国同时对C国进行制裁，不向其出口，则A、B两国因X的供求曲线均相同，两国之间也不会发生贸易，且A、B两国内X的均衡价格均为1.25。由此可计算实行制裁后与自由贸易相比
A国生产者损失136.875，消费者得益125.625，国民福利净损失11.25;
B国生产者损失136.875，消费者得益125.625，国民福利净损失11.25;
C国福利损失90。
⑶如果A国单独对C国实行制裁，不向其出口，则B、C两国间的国际市场仍可形成。B、C两国开展贸易后的国际价格和国际贸易量分别为2.5和50。那么与自由贸易相比的福利变化为：
A国生产者损失136.875，消费者得益125.625，国民福利净损失11.25;
B国生产者得益97.5，
消费者受损77.5，国民福利净增加20;
C国民福利净损失27.5;
从上面的分析表明，贸易制裁是一个损人也损己的举动，一国单独对它国实行贸易制裁时尤其如此。
第3题：
有如下SUB过程:
Sub s(x As Single,y As Single)
t=x
x=t / y
y=t Mod y
End Sub
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Form_Click()
Dim a As Single
Dim b As Single
a=5
b=4
s a,b
Print a,b
End Sub
则程序运行后,单击命令按钮,输出的结果为【 】 。
1.25,1 解析：调用s过程,传入"a=5,b=4"。t=5 , x=5/4, 故x=1.25;y=5%4,故y=1。返回并输出(1.25,1)
第4题：
下列程序的运行结果为______。Private Sub Command1_ Click() Dim s As Long Dim x As Integer s = 0 for x = 99 To 1 step - 2 s=s+ x Next x Print sEnd Sub
A．100
B．500
C．2500
D．5000
解析：单循环次数“r=int((终值-初值+步长)/步长)”。计算结果是将1～100内的奇数相加。
第5题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
A．10
B．30
C．40
D．50
解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。
第6题：
在两个国家的贸易模型中，设A、B两国对商品X的供给需求分别为A国：SA=10P DA=-20P+90 B国：SB=10P+30 DB=-20P+60
⑴求两国自由贸易下商品X的均衡价格及贸易量。
⑵假设A国对商品X征收每单位0.5元的进口关税，两国的国内价格、生产量和贸易量有什么变化?
⑶如果B国对商品X的生产者提供每单位0.5元的生产补贴，两国的国内价格、生产量和贸易量又会发生什么变化?
⑷在以上三种情况下，哪种政策对A国最有利，哪种政策对B国最有利?
⑴两国自由贸易下商品X的均衡价格P=2，贸易量T=30;
⑵如果A国对商品X征收每单位0.5元的进口关税，设B国的国内价格为P1，那么，A国的国内价格将为P1+0.5。
根据题意B国在价格为P1时的出口量正好等于A国在价格为P1+0.5时的进口量，
也就是说，-30(P1+0.5)+90=30P1-30
所以P1=7/4
因此，A国X的国内价格为9/4，B国的国内价格为7/4;A国X的产量为22.5，B国X的产量为47.5;两国间X的贸易量为22.5。
⑶如果B国对商品X的生产者提供每单位0.5元的生产补贴，则B国的供给曲线SB的方程变为SB*=10(P+0.5)+30，B国的出口供给曲线ESB也因此变为ESB*=30P-25 开展贸易市场均衡后，EDA=ESB*
所以，-30P+90=30P-25
由此，P=23/12
这样在B国提供生产补贴后，两国的国内价格均为23/12，A国X的产量为115/6，B国X的产量为325/6，两国间X的贸易量为65/2。
⑷相对于贸易前，在第⑴种情况下A国国民福利净增15，在第⑵种情况下A国国民福利净增19.69，在⑶种情况下A国国民福利净增17.6，因此，第⑵种情况对A国最有利;
对B国来说，与贸易前相比，第⑴、⑵、⑶三种情况分别使国民福利净增
第7题：
A、(1)两个国家生产两种商品;(2)两国的技术相同;(3)贸易使商品的价格在两国都相等
B、(1)两个国家生产两种商品;(2)两国的资金相同;(3)贸易使商品的价格在两国都相等
C、(1)两个国家生产多种商品;(2)两国的技术相同;(3)贸易使商品的价格在两国都相等
D、：(1)两个国家生产多种商品;(2)两国的技术相同;(3)贸易使商品的价格在两国有差距
第8题：
在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：
Public x as integer
Private Sub Command1_Click( )
x=5
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1( )
x=x+10
End Sub
Private Sub s2( )
Dim x as integer
x=x+10
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是______
15 解析： 本题使用Call调用子过程s1，s2。x=5在调用子过程s1后，x= 15，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于使用Dim…As关键字定义x，所以其值是模块范围的。所以在消息框中输出的值，是从子过程s2传回的值。
第9题：
设字符串s1='ABCDEFG',s2='PQRST',则运算s=CONCAT(SUB(s1，2，LEN(s2))，SUB(s1，LEN(s2，2))后的串值为(65)。
A．'ABCDEFEF'
B．'BCDEFG'
C．'BCPQRST'
D．'BCQR'
解析：s=CONCAT(SUB(s1，2，5)，SUB(s1，5，2))=CONCAT(BCDEF，EF)=‘BDCEFEF’
第10题：
假定有如下的Sub过程： Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为 ______ 。
A．5 4
B．1 1
C．1.25 4
D．1.25 1
解析：Visual Basic的函数参数默认的方式是传地址的，所以函数S对参数做的改变会反映到原来的变量里。