问题 单项选择题

2009年11月,首届世界低碳与生态经济大会技术博览会在江西南昌召开,在这次大会上,江西共签约项目143个,总投资为1045.95亿元,先后分三次签约;第一次,与23家央企签约37个合作项目,项目总投资为519.1亿元;第二次,九江市人民政府与中信集团签订旅游基础设施投资框架协议,项目总投资为120亿元;第三次,签约合同项目105个,项目总投资为407.85亿元。

从签约项目主要领域来看,旅游产业项目14个,占9.79%;钨及稀土深加工产业项目4个,占2.82%;医药化工产业项目14个,占9.79%;电子信息产业项目12个,占8.39%。

在签约项目中,与京、浙、沪、粤等省市(地区)签署的项目和投资总额较多,签约项目投资较多的省市(地区)为:北京34个,占23.77%;广东省25个,占17.48%;浙江省17个,占11.89%;上海市6个,占4.2%;港台地区合作项目数10个,占6.99%。

能够从上述资料中推出的是()

A.这次大会签约项目平均投资额超过8亿元

B.旅游产业签约项目数小于电子信息产业签约项目数

C.钨及稀土深加工产业投资额所占比重小于医药化工产业项目数所占比重

D.在签约省市(地区)中,签约项目数所占比重小于签约投资额所占比重的省市(地区)有3个

答案

参考答案:C

解析:

签约项目平均投资额为1045.95÷143<8亿元,A错误;旅游产业签约项目14个,电子信息产业签约项目数12个,B错误:钨及稀土深加工产业投资额占比重为7.35%,医药化工产业项目数所占比重9.79%,C正确:资料中只给出了一部分签约省市(地区)的项目数和投资比例,故D项无法推出。因此选C。

问答题

[说明] 以下Visual Basic代码实现了对位图(BMP)进行旋转显示。以下程序共实现了对BMP位图图形进行 180°旋转、90°旋转(顺时针)、90°旋转(逆时针)、水平翻转、垂直翻转共5项处理。显示界面如图12-8所示。仔细阅读[代码7-1]至[代码7-3],完成 (n) 代码,并写在对应栏内。

[代码7-1] Begin VB. Form Form1 AutoRedraw =-1 ’True Caption="图像的施转" //...窗体描述( 略 ) Begin VB. CommandButton Command7 Caption="退出" //...窗体描述(略 ) End Begin VB.CommandButton Command6 Caption = "复位" //...窗体描述(略) End Begin VB.CommandButton Command5Caption= "垂直翻转" //...窗体描述(略) End Begin VB.CommandButton Command4Caption="水平翻转" //...窗体描述(略) End Begin VB.CommandButton Command3Caption= "90°(逆时针)" //...窗本描述(略) End Begin VB.CommandButton Command2Caption= "90°(顺时针)" //...窗体描述(略) End Begin VB.PictureBox Picture2 //...窗体描述(略) End Begin VB.CommandButton Command1 Caption="180°" //...窗体描述(略) End Begin VB.PictureBox Picture 1 //...窗体描述(略) End End [代码7-2] Private Declare Function BitBlt Lib "gdi32" ( ByVal hDestDC As Long,ByVal x As Long,ByVal y As Long,ByVal n Width As Long,ByVal nHeight As Long,ByVal hSrcDC As Long,ByVal xSrc As Long,ByVal ySrc As Long,ByVal dwRop As Long ) As Long Const srcopy = &HCC0020Dim h As IntegerDim w As Integer Private Sub Form_Load ( )Picture2.Picture = LoadPicture ( App.Path & "\a01.bmp") ’导入图片’h = Picture 1 .Heightw = Picture 1.Width End Sub [代码7-3] Private Sub Commandl_Click ( ) 旋转180° Picture2.Picture = LoadPicture ( "" ) For j = 0 To h Step 1For i = 0 To w Step 1 (1) Next i Next j End Sub Private Sub Command2_Click ( ) ’顺时针施转90°’ Picture2.Picture = LoadPicture ( "" ) For i-h To 0 Step-1For j - 0 To w Step 1 (2) Next j Next i End Sub Private Sub Command3_Click ( ) ’逆时针旋转90°’ Picture2.Picture = LoadPicture ("") For j =w To 0 Step -1For i = 0 To h Step 1 (3) Next i Next j End Sub Private Sub Command4 Click ( ) ’水平翻转 Picture2.Picture = LoadPicture ( "" ) For i = w To 0 Step -1For j = 0 To h Step 1 (4) Next j Next i End Sub Private Sub Command5_Click ( ) ’垂直翻转 Picture2.Picmre = LoadPicmre ( "" ) Forj = 0 To h Step 1For i = 0 To w Step I (5) Next i Next j End Sub Private Sub Command6_Click ( ) ’复位 Picture2.Picture = LoadPicmre ( "" ) For i = 0 To w Step 1For j = 0 To h Step 1 (6) Next j Next iEnd Sub

多项选择题