[单项选择]已知a、b、c、d都是正整数，且a＞b＞c＞d，a+b+c+d=2004，2a-2b+2c-2d=2004，则a+d的最小值是( )。
A. 1502
B. 1005
C. 1004
D. 999

[单项选择]已知a、b、c、d都是正整数，且a＞b＞c＞d，a+b+c+d=2004，2a-2b+2c-2d=2004，则a+d的最小值是( )。
A. 1502
B. 1005
C. 1004
D. 999

[简答题]已知文件IN.DAT中存有若干个小于200的四位正整数，函数ReadDat（　）读取若干个正整数并将其存入数组xx中。请编制函数CalValue（　），其功能要求：求出这个文件中共有所少个正整数totNum；求这些数中的各位数字之和是奇数的数的个数totCnt，以及满足此条件的这些数的算术平均值totPjz；最后调用函数writeDat（　）把求出的结果输出到文件OUT.DAT中。
注意：部分源程序已经给出。
请勿改动主函数main（　）、读函数ReadDat（　）和写函数writeDAT（　）的内容。
[试题源程序]
#inciude＜stdio.h＞
#include＜conio.h＞
#define MAXNUM 200
int xx[MAXNUM];
int totNum=0;
int totCnt=0;
double totPjz=0.0;
int ReadDat(void);
void writeDat(void);
void CaiVaiue(void)


void main（　）

int i;
system("cls");
for(i=0;i＜MAXNUM;i++) xx[i]=0;
if(ReadDat（　）)

printf("数据文件IN.DAT不能打开!/007/n");
return;

CalValme（　）;
printf("文件IN.DAT中共有正整数=%d个/n",totNum);
printf("符合条件的正整数的个数=%d个/n",totCnt);
printf("平均值=%.2f/n",totpjZ);
writeDat（　）;

int ReadDat(void)

FILE *fp;
int i=0;
if((fp=fopen("IN.DAT","r"))==NULL) return 1;
while(!feof(fp))

fscan

[简答题]

已知在文件IN.DAT中存有若干个(＜200)四位正整数，函数ReadDat（　）读取若干个正整数并将其存入数组xx中。请编制函数CalValue（　），其功能要求：
(1)求出这个文件中共有多少个正整数totNum。
(2)求这些正整数中各位数字之和是奇数的正整数的个数totCnt，以及满足此条件的正整数的算术平均值totPjz，最后调用函数writeDat（　）把结果输出到文件OUT.DAT中。
注意：部分源程序已经给出。
请勿改动主函数main（　）、读函数ReadDat（　）和写函数、writeDAT（　）的内容。
[试题源程序]
#inolude＜stdio.h＞
#iFIclude＜conio.h＞
#define MAXNUM 200
int xx[NAXNUN];
int totNum=0;
int totCnt=0;
double totPjz=0.0;
int ReadDat(void);
void writeDat(void);
void CalValue(void)


void main（　）

int i;
system("cls");
for(i=0;i＜NAXNUN;i++)xx[i]=0;
if(ReadDat（　）)

printf("数据文件IN.DAT不能打开!/007/n");
return;

CalValue（　）;
printf("文件IN.DAT中共有正整数=%d个/n",totNum);
printf("符合条件的正整数的个数=%d个/n",totCnt);
printf("平均值=%.2f/n",totPjz);
writeDat（　）;

int ReadDat(VOid)

FI

[单项选择]已知三角形三边长分别为3、15、X。若X为正整数，则这样三角形有多少个？
A. 3个 
B. 4个 
C. 5个 
D. 无数个

[简答题]

已知在文件in．dat中存有若干个(小于200)的4位数字的正整数，函数ReadDat（　）读取若干个正整数并存人数组xx中。请编制函数CalValue（　），其功能要求：(1)求出这文件中共有多少个正整数totNum；(2)求这些数中的各位数字之和是奇数的数的个数totCnt，以及满足此条件的这些数的算术平均值totPjz，最后调用函数writeDat（　），把所求的结果输出到文件out.dat中。
注意：部分源程序已经给出。
请勿改动主函数main（　）、读函数ReadDat（　）和写函数writeDAq、（　）的内容。
[试题源程序]
#include＜stdio．h＞
#include＜conio．h＞
#define MAXNUM 200
int xx[MASNUM]；
int totNum=0；
int totCnt=0；
double totPjz=0.0：
int ReadDat(void)：
void writeDat(void)；
void CalValue(void)
{
}
void main（　）
{
int i；
system("cls")；
for(i=0；i＜MAXNUM；i++)xx[i]=0；
if(ReadDat（　）)

printf("数据文件IN．DAT不能打开!/007/n")；
return；

CalValue（　）；
printf("文件IN．DAT中共有正整数=%d个/n"，totNum)；
printf("符合条件的正整数的个数=%d个/n"，totCnt)；
printf("平均值：%2f/n"，totPjz)；
writeDat（　）；

int ReadDat(void)

FILE*fp；

[简答题]编写程序，任意输入一个正整数，求出该正整数中最大的数字和最小的数字，如果该整数是个位数的话，最大的数字和最小的数字就是它本身。

[简答题]已知在文件in70.dat中存有若干个(个数＜200)4位数字的正整数，函数ReadDat（　）是读取这若干个正整数并存入数组xx中。请编制函数CalValue（　），其功能要求是：(1)求出这个文件中共有多少个正整数totNum。 (2)求这些数右移一位后，产生的新数是奇数的数的个数totCnt，以及满足此条件的这些数(右移前的值)的算术平均值totPjz。最后调用函数WriteDat（　）把所有结果输出到文件out70.dat中。
注意：部分源程序已给出。
请勿改动主函数main（　）、读函数ReadDat（　）和写函数Wiltedat（　）的内容。
试题程序：
# inc lude＜stdio, h＞
# inc lude＜conio, h＞
# define MAXNUM 200 int xx [MAXNUM];
int totNum=0;
int totCnt=0;
double totPjz=0.0;
int ReadDat (void);
void WriteDat (void); void CalValue (void)
void main ( )

int i;
clrscr ( );
for ( i=0; i＜MAXNUM; i++ )
xx[i] =0;
if (ReadDat （　）)

printf ( "数据文件IN70. DAT 不能打开! /007/n" );
return;

CalValue ( );
printf ( "文件IN70.DAT中共有正整数=%d个/n", totNum);
printf ( "符合条件的正整数的个数=%d个/n", totCnt );
printf ( "平均值=%.21f/n", totPjz);
WriteDat ( );

int ReadDat (void)

FILE *

[单项选择]

已知正整数数列｛a_n｝满足a_n+2=a_n+1+a_n且第七项等于18，则该数列的第10项为（）

A. 47
B. 72
C. 76
D. 123

[单项选择]5个连续正整数，每个数都是合数，这5个连续正整数的和最小为（）。
A. 110
B. 130
C. 150
D. 170
E. 180

[单项选择]已知100个正整数的和等于10000，在这些数里，奇数比偶数多，则这些数里至多有偶数的个数为______。
A. 49
B. 48
C. 47
D. 46

[单项选择]已知正整数数列｛ａn｝满足ａn+2＝ａn+1＋ａn，且第七项等于18，则该数列的第10项为（）。
A. 47
B. 72
C. 76
D. 123

[单项选择]已知公差为2的正整数等差数列为an，则该数列满足不等式7/16＜an/5＜398/9的所有项的和为（ ）
A. 12320
B. 12430
C. 12432
D. 12543

[单项选择]

已知m,n是正整数，则m是偶数。

（1）3m+2n是偶数
（2）3m²+2n²是偶数（）

A. 条件（1）充分，但条件（2）不充分
B. 条件（2）充分，但条件（1）不充分
C. 条件（1）和（2）单独都不充分，但条件（1）和（2）联合起来充分
D. 条件（1）充分，条件（2）也充分
E. 条件（1）和（2）单独都不充分，条件（1）和（2）联合起来也不充分

[单项选择]

已知﹛a_n﹜为等差数列，这改数列的公差为零（）
（1）对任何正整数n，都有a₁+a₂+…+a_n≤n
（2）a₂≥a₃

A. 条件（1）充分，但条件（2）不充分
B. 条件（2）充分，但条件（2）不充分 
C. 条件（1）和（2）单独都不充分，但条件（1）和（2）联合起来充分
D. 条件（1）充分，条件（2）也充分 
E. 条件（1）和（2）单独都不充分，条件（1）和（2）联合起来也不充分

[单项选择]

有一段小程序，对数组A[n]中所有正整数和负整数求累加和，negat和posit分别返回负整数和正整数的累加和。
int maxInt=32767，minInt=-32768；
negat=0；posit=0；
for(int i=0；i＜n；
i++) if(A[i]＜0＆＆A[i]＞=minInt-negat)negat=negat+A[i]；
else if(A[i]＞0＆＆A[i]＜=maxInt-posit)posit=posit+A[i]；
可能的测试路径数是（）。

A. 3
B. 4
C. 5
D. 6

[单项选择]假设五个相异正整数的平均数是15，中位数是18，则此五个正整数的最大数的最大值可能是
A. 24
B. 32
C. 35
D. 40

[单项选择]已知a为正整数，且关于x的方程1g(4-2x²)=1g(a-x)+1有实数根，则a等于（）。
A. 1
B. 1或2
C. 2
D. 2或3

[简答题]改错题(14分) 【题目】 本程序的功能是在六位正整数中查找超级自恋数。如果将一个六位正整数从高位到低位,每两位分为一组,共分为三组,三组数据的立方的和正好等于其本身,则称该六位正整数为超级自恋数。1 Option Explicit2 Private Sub CmdFind_Click（　）3 Dim k As Long,num（　）As Integer,fg As Boolean4 Dim i As Integer,st As String5 st=""6 For k=100000 To 9999997 fg=False8 Call judge(k,num,fg)9 If fg Then10 For i=UBound(num) To 1 Step -111 st=st & num(i) & "^3+"12 Next i 13 List1.Additem Left(st,Len(st)-1) & "=" & k14 End If15 Next k16 End Sub17 Private Sub judge(n As Long,a（　）As Integer,fg As Boolean)18 Dim k As Integer,nt As Long,sum As Long19 nt=n20 Do21 k=k+122 ReDim a(k)23 a(k)=n Mod 10024 n=n/10025 Loop Until n=026 For k=1 To UBound(a)27 sum=sum+a(k)^328 Next k29 If sum=nt Then fg=True30 End Sub【要求】 1.新建工程,按参考界面形式创建窗体,再从T盘根目录下的err.txt文件中将有错误的程序代码复制到代码编辑器窗口中或自行输入上述代码,改正程序中的错误。 2.改错时,不得增加或删除语句,但可适当调整语句的位置。 3.将窗体文件和工程文件分别命名为F1和P1,并保存

[单项选择]假设五个相异正整数的平均数是15，中位数是18，则此五个正整数中的最大数的最大值可能为( )。
A. 24
B. 32
C. 35
D. 40