１.*PROG1 已知在文件IN.DAT中存有若干個（個數(shù)<200）四位數(shù)字的正整數(shù)，函數(shù)ReadDat()是讀取這若干個正整數(shù)并存入數(shù)組XX中。請編制函數(shù)CalValue()，其功能要求：1、求出這文件中共有多少個正整數(shù)totNum；２、求出這些數(shù)中的各位數(shù)字之和是偶數(shù)的數(shù)的個數(shù)totCnt，以及滿足此條件的這些數(shù)的算術(shù)平均值totpjZ，最后調(diào)用函數(shù)WriteDat()把所求的結(jié)果輸出到文件OUT2.DAT中。注意：部分部分源程序存放在PROG1.C中。請勿改動主函數(shù)main()，讀數(shù)據(jù)函數(shù)ReacdDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。*/
    #include
    #include
    #define MAXNUM 200
    int xx[MAXNUM] ;
    int totNum = 0 ; /* 文件IN.DAT中共有多少個正整數(shù) */
    int totCnt = 0 ; /* 符合條件的正整數(shù)的個數(shù) */
    double totPjz = 0.0 ; /* 平均值 */
    int ReadDat(void) ;
    void WriteDat(void) ;
    void CalValue(void)
    { int i;
    int a,b,c,d;
    double sum=0;
    for (i=0;iif (xx[i]>0)
    {
    totNum++;
    a=xx[i]/1000;
    b=xx[i]/100-a*10;
    c=xx[i]/10-a*100-b*10;
    d=xx[i];
    if((a+b+c+d)%2==0)
    {totCnt++;
    sum=sum+xx[i];
    }
    }
    totPjz=sum/totCnt;
    }
    void main()
    {
    clrscr() ;
    if(ReadDat()) {
    printf("數(shù)據(jù)文件IN.DAT不能打開!\007\n") ;
    return ;
    }
    CalValue() ;
    printf("文件IN.DAT中共有正整數(shù)=%d個\n", totNum) ;
    printf("符合條件的正整數(shù)的個數(shù)=%d個\n", totCnt) ;
    printf("平均值=%.2lf\n", totPjz) ;
    WriteDat() ;
    }
    int ReadDat(void)
    {
    FILE *fp ;
    int i = 0 ;
    if((fp = fopen("in.dat", "r")) == NULL) return 1 ;
    while(!feof(fp)) {
    fscanf(fp, "%d,", &xx[i++]) ;
    }
    fclose(fp) ;
    return 0 ;
    }
    void WriteDat(void)
    {
    FILE *fp ;
    fp = fopen("OUT2.DAT", "w") ;
    fprintf(fp, "%d\n%d\n%.2lf\n", totNum, totCnt, totPjz) ;
    fclose(fp) ;
    }
    2./*PROG2 已知在文件IN.DAT中存有若干個（個數(shù)<200）四位數(shù)字的正整數(shù)，函數(shù)ReadDat()是讀取這若干個正整數(shù)并存入數(shù)組XX中。請編制函數(shù)CalValue()，其功能要求：1、求出這文件中共有多少個正整數(shù)totNum；２、求出這些數(shù)右移1位后，產(chǎn)生的新數(shù)是偶數(shù)的數(shù)的個數(shù)totCnt，以及滿足此條件的這些數(shù)（右移前的值）的算術(shù)平均值totpjZ，最后調(diào)用函數(shù)WriteDat()把所求的結(jié)果輸出到文件OUT4.DAT中。
    注意：部分部分源程序存放在PROG2.C中。
    請勿改動主函數(shù)main()，讀數(shù)據(jù)函數(shù)ReacdDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。*/
    #include
    #include
    #define MAXNUM 200
    int xx[MAXNUM] ;
    int totNum = 0 ; /* 文件IN.DAT中共有多少個正整數(shù) */
    int totCnt = 0 ; /* 符合條件的正整數(shù)的個數(shù) */
    double totPjz = 0.0 ; /* 平均值 */
    int ReadDat(void) ;
    void WriteDat(void) ;
    void CalValue(void)
    { int i,s;
    double sum=0;
    for (i=0;iif (xx[i]>0)
    { totNum++;
    s=xx[i];
    s=s>>1;
    if ((s%2)==0)
    {
    totCnt++;
    sum=sum+xx[i];
    }
    }
    totPjz=sum/totCnt;
    }
    void main()
    {
    clrscr() ;
    if(ReadDat()) {
    printf("數(shù)據(jù)文件IN.DAT不能打開!\007\n") ;
    return ;
    }
    CalValue() ;
    printf("文件IN.DAT中共有正整數(shù)=%d個\n", totNum) ;
    printf("符合條件的正整數(shù)的個數(shù)=%d個\n", totCnt) ;
    printf("平均值=%.2lf\n", totPjz) ;
    WriteDat() ;
    }
    int ReadDat(void)
    {
    FILE *fp ;
    int i = 0 ;
    if((fp = fopen("in.dat", "r")) == NULL) return 1 ;
    while(!feof(fp)) {
    fscanf(fp, "%d,", &xx[i++]) ;
    }
    fclose(fp) ;
    return 0 ;
    }
    void WriteDat(void)
    {
    FILE *fp ;
    fp = fopen("OUT4.DAT", "w") ;
    fprintf(fp, "%d\n%d\n%.2lf\n", totNum, totCnt, totPjz) ;
    fclose(fp) ;
    }
    3./*PROG3 已知在文件IN.DAT中存有若干個（個數(shù)<200）四位數(shù)字的正整數(shù)，函數(shù)ReadDat()是讀取這若干個正整數(shù)并存入數(shù)組XX中。請編制函數(shù)CalValue()，其功能要求：1、求出這文件中共有多少個正整數(shù)totNum；２、求出這些數(shù)中的個位數(shù)位置上的數(shù)字是3.6和9的數(shù)的數(shù)的個數(shù)totCnt，以及滿足此條件的這些數(shù)的算術(shù)平均值totpjZ，最后調(diào)用函數(shù)WriteDat()把所求的結(jié)果輸出到文件OUT5.DAT中。
    注意：部分部分源程序存放在PROG3.C中。請勿改動主函數(shù)main()，讀數(shù)據(jù)函數(shù)ReacdDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。*/
    #include
    #include
    #define MAXNUM 200
    int xx[MAXNUM] ;
    int totNum = 0 ; /* 文件IN.DAT中共有多少個正整數(shù) */
    int totCnt = 0 ; /* 符合條件的正整數(shù)的個數(shù) */
    double totPjz = 0.0 ; /* 平均值 */
    int ReadDat(void) ;
    void WriteDat(void) ;
    void CalValue(void)
    { int i,gw;
    double sum=0;
    for(i=0;iif (xx[i]>0)
    { totNum++;
    gw=xx[i];
    if((gw==3)||(gw==6)||(gw==9))
    {
    totCnt++;
    sum=sum+xx[i];
    }
    }
    totPjz=sum/totCnt;
    }
    void main()
    {
    clrscr() ;
    if(ReadDat()) {
    printf("數(shù)據(jù)文件IN.DAT不能打開!\007\n") ;
    return ;
    }
    CalValue() ;
    printf("文件IN.DAT中共有正整數(shù)=%d個\n", totNum) ;
    printf("符合條件的正整數(shù)的個數(shù)=%d個\n", totCnt) ;
    printf("平均值=%.2lf\n", totPjz) ;
    WriteDat() ;
    }
    int ReadDat(void)
    {
    FILE *fp ;
    int i = 0 ;
    if((fp = fopen("in.dat", "r")) == NULL) return 1 ;
    while(!feof(fp)) {
    fscanf(fp, "%d,", &xx[i++]) ;
    }
    fclose(fp) ;
    return 0 ;
    }
    void WriteDat(void)
    {
    FILE *fp ;
    fp = fopen("OUT5.DAT", "w") ;
    fprintf(fp, "%d\n%d\n%.2lf\n", totNum, totCnt, totPjz) ;
    fclose(fp) ;
    }