[填空题]要打印出50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。
Option Base 1
Private Sub Command1_Click( )
　　Dim b( )
　　Randomize
　　______
　　Do
　　　　x = Rnd
　　　　If x ＞ 0.5 Then y = 1 Else y = -1
　　　　t = y * Int(Rnd * 100)+ 1
　　　　______
　　　　Do While k < j
　　　　　　If t ＜＞ b(k)Then
　　　　　　　　k = k + 1
　　　　　　Else
　　　　　　　　Exit Do
　　　　　　End If
　　　　Loop
　　　　If k = j Then
　　　　　　ReDim Preserve b(k)
　　　　　　b(k)= t
　　　　　　Print b(k);
　　　　　　j = j + 1
　　　　End If
　　Loop Until j ＞ 50
　　Print
　　______
　　Max = b(1)
　　For n = 2 To 50
　　　　If b(n)＞ Max Then
　　　　　　______
　　　　　　p = n
　　　　End If
　　Next n
　　Print "最大数是："; Max
　　Print "位置在第"; p; "个"
End Sub

[填空题]要打印出50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。
Option Base 1
Private Sub Command1_Click（　）
Dim b（　）
Randomize
【12】
Do
x=Rnd
If x＞0.5 Then y=1 Else y=-1
t=y*Int(Rnd*100)+1
【13】
Do While k＜j
If t ＜＞ b(k)Then
k = k + 1
Else
Exit Do
End If
Loop
If k=j Then
ReDim Preserve b(k)
b(k)=t
Print b(k)；
j=j+1
End If
Loop Until j＞50
Print
【14】
Max=b(1)
For n=2 To 50
If b(n)＞Max Then
【15】
p = n
End If
Next n
Print "最大数是："；Max
Print "位置在第"；p；"个"
End Sub

[不定项选择]需要在文档中插入一个日期，并要求此日期在不同时间打印出不同的日期须（ ）。
A. 在“插入”菜单下选择“日期和时间”命令，选择合适的日期格式，单击“确定”返回文档区
B. 在“插入”菜单下选择“日期和时间”命令，选择合适的日期格式，并选中“作”复选框，单击“确定”按钮返回文档区
C. “插入”菜单下选择“域”命令，选择“日期和时间”分类，选择合适域名，单按钮返回文档区在“工具”菜单下选择“选项”命令
D. 在“打印”选项卡中选定“更新域”复选框

[单项选择]在程序中有一个错误处理模块，它接收出错信号，对不同类型的错误打印出不同的出错信息，则该模块设计时内聚类型为（）。
A. 逻辑内聚
B. 信息内聚
C. 功能内聚
D. 过程内聚

[单项选择]下列Applet实现了用不同颜色打印出大写字母A～J。请选择正确的语句填入横线处。 import java.applet.*; import java.awt.*; public class ex29 extends Applet { public void paint (Graphics gg) { int r = 0, g = 0, b = 0, j = 20; for(char ch = ’A’; ch ＜= ’J’; ch ++) { gg.drawString("" + ch, j, 30); if(ch - ’A’ % 3 == 0) r += 50; if(ch - ’B’ % 3 == 0) g += 30; if(ch - ’C’ % 3 == 0) b += 20; j +=17; } } }
A. setColor(ncw Color(r, g, );
B. gsetColor(new Color(r, g, );
C. setColor(new Color(r, g, );
D. gsetColor(Color(r, g, );

[单项选择]在3和2187之间插入若干个正数，使它们组成等比数列，若插入的这些数的和是1089，则插入的最大数为（）。
A. 829
B. 729
C. 629
D. 363
E. 243

[单项选择]侧重药物之间、不同剂型之间、品牌药之间及其与过保护期药品之间比较的是
A. 《医师案头参考》
B. 《美国药典药物信息》
C. 《事实与比较》
D. 《中国药典临床用药须知》
E. 《美国医院处方服务～～药物信息》

[单项选择]______是指同一财务报表的不同项目之间、不同类别之间、在同一年度不同财务报表的有关项目之间，各会计要素的相互关系。
A. 财务指标
B. 财务目标
C. 财务比率
D. 财务分析

[简答题]请编写程序，从IN.DAT文件中读取200个整数至数组xx中，求出最大数max及最大数的个数cnt和数组xx中能被3整除或能被7整除的算术平均值pj(保留2位小数)。结果max、cnt、pj输出到OUT.DAT文件中。
注意：部分程序、读数据函数read_dat(int xx[200])及输出格式已给出。
#include＜conio.h＞
#include＜stdio.h＞
#define N 200
void read_dat(int xx[N])

int i,j;
FILE *fp;
fp=fopen("IN.DAT","r");
for(i=0;i＜20;i++)

for(j=0;j＜10;j++)

fscanf(fp,"%d,",＆xx[i*10+j]);
printf("%d",xx[i*10+j]);

printf("/n");

fclose(fp);

void main（　）

int cnt,xx[N],max;
float pj;
FILE *fw;
int i,k;
long j=0;
fw=fopen("OUT.DAT","w");
read_dat(xx);
/**************************************/
/**************************************/
printf("/n/nmax=%d,cnt=%d,pj=%6.2f/n",max,cnt,pj);
fprintf(fw,"%d/n%d/n%6.2f/n",max,cnt,pj);
fclose(fw);

[填空题]【说明】 下面程序的功能是：在含有10个元素的数组中查找最大数，及最大数所在位置(即下标值)，最大数可能不止一个。 例如：若输入 2 8 5 7 8 4 8 3 2 8 则应输出 The max：8 Total：4 //最大数出现次数 The positions：1 4 6 9 【函数】 #include＜stdio.h＞ #define M 10 int fun(int* a,int * n,int pos[ ]) { int i, k max = - 32767; (1) for(i=0;i＜M;i++) if( (2) )max=a[i]; for(i=0;i＜M;i++) if( (3) )pos[k++]=i; *n=k; return max; } main（　） { int a[M],pos[M],i=0j,n; printf("Enter 10umber:") for(i=0,i＜M;i++)scanf("%d", (4) ); j=fun( (5) ); printf("The max:%d/n",j); printf("Total: %d", n); printf("The position:") for (i=0; i＜n;i++) printf ("%4d", pos[i]); printf("/n"); }

[单项选择]按不同产品设置不同的税目，采用不同比例的税率，以体现不同产品之间税率差别的比例税率是（）
A. 统一比例税率 
B. 产品差别比例税率 
C. 行业差别比例税率 
D. 地区差别比例税率

[判断题]（）EDI在不同的企业之间、不同的信息管理系统之间建立了一种统一的数据交换格式。