1_pro.c

C源代码 计算机等级考试C语言上机题

#include  <conio.h>
#include  <stdio.h>
#define  N  200
void read_dat(int xx[N])
{
  int i,j;
  FILE *fp;
  fp=fopen("IN40.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 cnt1,cnt2,xx[N];
  float pj;
  FILE *fw;
  int i,k=0;
  long j;
  clrscr();
  fw=fopen("OUT40.DAT","w");
  read_dat(xx);
  for(i=0,j=0,cnt1=0,cnt2=0;i<N;i++)
  {
    if(xx[i]%2)   
      cnt1++;       /*求出数组xx中奇数的个数cnt1*/
    else
      cnt2++;       /*求出数组xx中偶数的个数cnt2*/
    if(i%2==0) 
    {
      j+=xx[i];   /*计算数组xx下标为偶数的元素值的和*/
      k++;
    }
  }
  pj=(float)(j*100/k)/100;  /*计算数组xx下标为偶数的元素值的算术平均值*/
  printf("\n\ncnt1=%d,cnt2=%d,pj=%6.2f\n",cnt1,cnt2,pj);
  fprintf(fw,"%d\n%d\n%6.2f\n",cnt1,cnt2,pj);
  fclose(fw);
}