*****************************************************************************************
题目61（无忧id 19结构体运算题）

已知在文件in.dat中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)五部分组成。其中：金额=单价*数量计算得出。函数readdat()是读取这100个销售记录并存入结构数组sell中。请编制函数sortdat()，其功能要求：按金额从小到大进行排列，若金额相同，则按产品代码从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数writedat()把结果输出到文件out2.dat中。
    　部分源程序存在文件prog1.c中。
　　请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。
#include <stdio.h>
#include <mem.h>
#include <string.h>
#include <conio.h>
#include <stdlib.h>
#define max 100
typedef struct{
  char dm[5];  /*产品代码*/
  char mc[11]; /*产品名称*/
  int dj;      /*单价*/
  int sl;      /*数量*/
  long je;     /*金额*/
}pro;
pro sell[max];
void readdat();
void writedat();
void sortdat()
{int i,j;
 pro xy;
 for(i=0;i<99;i++)
  for(j=i+1;j<100;j++)
    if(sell[i].je>sell[j].je||sell[i].je==sell[j].je&&strcmp(sell[i].dm,sell[j].dm)<0)
       {xy=sell[i]; sell[i]=sell[j]; sell[j]=xy;}
}

void main()
 {
 memset(sell,0,sizeof(sell));
 readdat();
 sortdat();
 writedat();
 }

void readdat()
{
 file *fp;
 char str[80],ch[11];
 int i;
fp=fopen('in.dat','r');
 for(i=0;i<100;i++){
   fgets(str,80,fp);
   memcpy(sell[i].dm,str,4);
   memcpy(sell[i].mc,str+4,10);
   memcpy(ch,str+14,4);ch[4]=0;
   sell[i].dj=atoi(ch);
   memcpy(ch,str+18,5);ch[5]=0;
   sell[i].sl=atoi(ch);
   sell[i].je=(long)sell[i].dj*sell[i].sl;
  }
 fclose(fp);
}

void writedat(void)
{
 file *fp;
 int i;
fp=fopen('out2.dat','w');
 for(i=0;i<100;i++){
  printf('%s %s %4d %5d %5d/n', sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);
 fprintf(fp,'%s %s %4d %5d %5d/n', sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);
 }
 fclose(fp);
}


****************************************************************************************
题目62（无忧id 9 字符替换题）
无忧id  9 题条件微有不同，解法在后面给出

函数readdat()实现从文件eng.in中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptchar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数writedat()把结果xx输出到文件ps2.dat中。
　　替代关系：f(p)=p*13 mod 256（p是数组中某一个字符的ascii值，f(p)是计算后新字符的ascii值），如果计算后f(p)值小于等于32或其ascii值是偶数，则该字符不变，否则将f(p)所对应的字符进行替代。
　　部分源程序存在文件prog1.c中。原始数据文件存放的格式是：每行的宽度均小于80个字符。
　　请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。
#include <stdio.h>
#include <string.h>
#include <conio.h>
#include <ctype.h>
unsigned char xx[50][80];
int maxline=0;/*文章的总行数*/
int readdat(void);
void writedat(void);
void encryptchar()
{ int i,j;
  for(i=0;i<maxline;i++)
    for(j=0;j<strlen(xx[i]);j++)
      if(xx[i][j]*13%256<=32||(xx[i][j]*13%256)%2==0) continue;
      else xx[i][j]=xx[i][j]*13%256;
}

void main()
 {
 clrscr();
 if(readdat()){
  printf('数据文件eng.in不能打开！/n/007');
  return;
 }
 encryptchar();
 writedat();
}

int readdat(void)
{
 file *fp;
 int i=0;
 unsigned char *p;
 if((fp=fopen('eng.in','r'))==null) return 1;
 while(fgets(xx[i],80,fp)!=null){
   p=strchr(xx[i],'/n');
   if(p)*p=0;
   i++;
}
maxline=i;
fclose(fp);
return 0;
}

void writedat(void)
{
 file *fp;
 int i;
fp=fopen('ps2.dat','w');
 for(i=0;i<maxline;i++){
 printf('%s/n',xx[i]);
 fprintf(fp,'%s/n',xx[i]);
 }
 fclose(fp);
}

void encryptchar()   /*如果计算后f(p)值小于等于32或原字符ascii值是偶数*/
{ int i,j;
  for(i=0;i<maxline;i++)
    for(j=0;j<strlen(xx[i]);j++)
      if(xx[i][j]*13%256<=32||xx[i][j]%2==0) continue;
      else xx[i][j]=xx[i][j]*13%256;
}

此题还有许多解法，方法可看题8


*****************************************************************************************
★☆题目63（无忧id  67、94 字符串移位题）

程序prog1.c的功能是：把 s 字符串中的所有字符左移一个位置，串中的第一个字符移到最后。请考生编写函数chg(char *s)实现程序要求，最后调用函数readwritedat( )把结果输出到bc2.out文件中。
   　 例如：s字符串中原有内容为：mn.123xyz，则调用该函数后，结果为：n.123xyzm。
    　注意：部分源程序存在文件prog1.c文件中。
    　请勿改动主函数main( )和输出数据函数readwritedat()的内容。
#include <conio.h>
#include <stdio.h>
#define  n 81
void readwritedat();
void chg(char *s)
{ int i;
  char ch=*s;
  for(i=0;i<strlen(s)-1;i++)
    s[i]=s[i+1];
  s[strlen(s)-1]=ch;
}

main()
{
  char a[ n ] ;
  clrscr();
  printf('enter a string : '); gets(a);
  printf('the original string is : '); puts(a);
  chg(a);
  printf('the string after modified : ');
  puts(a);
  readwritedat();
}

void readwritedat()
{
  int i ;
  char a[n] ;
  file *rf, *wf ;
rf = fopen('bc2.in', 'r') ;
  wf = fopen('bc2.out', 'w') ;
  for(i = 0 ; i < 50 ; i++) {
    fscanf(rf, '%s', a) ;
    chg(a) ;
    fprintf(wf, '%s/n', a) ;
  }
  fclose(rf) ;
  fclose(wf) ;
}


*****************************************************************************************
★题目64（无忧id 22  素数题）

下列程序的功能是：找出所有100以内（含100）满足i，i+4，i+10都是素数的整数i（i+10也在100以内）的个数cnt以及这些i之和sum。请编写函数countvalue()实现程序要求的功能，最后调用函数writedat()把结果cnt和sum输出到文件out.dat中。
    　部分源程序存在文件prog1.c中。
    　请勿改动主函数main()和输出数据函数writedat()的内容。
#include <stdio.h>
int cnt,sum;
int isprime(int number)
{
 int i,tag=1;
 for(i=2;tag && i<=number / 2; i++)
  if(number % i ==0) tag =0;
 return tag;
}

void countvalue()
{int i;
 for(i=2;i<=90;i++)
   if(isprime(i)&&isprime(i+4)&&isprime(i+10))
     {cnt++;sum+=i;}
}

void main()
{
 cnt=sum=0;
 countvalue();
 printf('满足条件的整数的个数＝%d/n',cnt);
 printf('满足条件的整数的和值＝%d/n',sum);
 writedat();
}

writedat()
{
 file *fp;
 fp=fopen('out.dat','w');
 fprintf(fp,'%d/n%d/n',cnt,sum);
 fclose(fp);
}
运行结果为：
满足条件的整数的个数＝7
满足条件的整数的和值＝201

*****************************************************************************************
★☆题目65（无忧id 45  整数统计运算题）

已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求这些数中的各位数字之和是奇数的数的个数totcnt，以及满足此条件的这些数的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。
    　部分源程序存在文件prog1.c中。
    　请勿改动主函数main()、读函数readdat()和写函数writedat()的内容。
#include <stdio.h>
#include <conio.h>
#define maxnum 200

int xx[maxnum];
int totnum=0; /*文件in.dat中共有多少个正整数*/
int totcnt=0; /*符合条件的正整数的个数*/
double totpjz=0.0;   /*平均值*/
int readdat(void);
void writedat(void);
void calvalue(void)
{ int i ,qw,bw,sw,gw;
  for(i=0;i<maxnum;i++)
if(xx[i]>0)
{  totnum++;
        qw=xx[i]/1000;   bw=xx[i]/100%10;
        sw=xx[i]%100/10; gw=xx[i]%10;
        if((qw+bw+sw+gw)%2) { totcnt++; totpjz+=xx[i];}
     }
  if(totcnt==0) totpjz=0;
  else totpjz/=totcnt;
}

void main()
{
 int i;
 clrscr();
 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;
 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('out.dat','w');
 fprintf(fp,'%d/n%d/n%6.2f/n',totnum,totcnt,totpjz);
fclose(fp);
}

*****************************************************************************************
★☆题目66（无忧id  47 素数题）

下列程序prog1.c的功能是：计算500-800区间内素数的个数cnt，并按所求素数的值从大到小的顺序，再计算其间隔加、减之和，即第1个素数-第2个素数+第3个素数-第4个素数+第5个素数...的值sum。请编写函数countvalue()实现程序的要求，最后调用函数writedat()把结果cnt和sum，输出到文件out11.dat中。
    　部分源程序已给出。
    　请勿改动主函数main()和输出数据函数writedat()的内容。
#include <stdio.h>
int cnt,sum;
 void countvalue()
{int i,j,k=1;
 for(i=800;i>500;i--)
  { for(j=2;j<i;j++)
     if(i%j==0) break;
   if(j==i) { cnt++;  sum=sum+k*i;  k=k*(-1); }
  }
}

void main()
{
 cnt=sum=0;
  countvalue();
 printf('素数的个数=%d/n',cnt);
 printf('按要求计算的值=%d/n',sum);
 writedat();
}

writedat()
{
 file *fp;
 fp=fopen('out11.dat','w');
 fprintf(fp,'%d/n%d/n',cnt,sum);
 fclose(fp);
}


*****************************************************************************************
题目67（无忧id 49 整数各位数字运算题）

下列程序的功能是：选出5000以下符合条件的自然数。条件是：千位数字与百位数字之和等于十位数字与个位数字之和，且千位数字与百位数字之和等于个位数字与千位数字之差的10倍。计算并输出这些四位自然数的个数cnt以及这些数的和sum。请编写函数countvalue()实现程序的要求，最后调用函数writedat()把结果cnt和sum，输出到文件out13.dat中。
    　部分源程序存在文件prog1.c中。
    　请勿改动主函数main()和输出数据函数writedat()的内容。
#include <stdio.h>
int cnt,sum;
 void countvalue()
{int i,thou,hun,ten,data;
 for(i=1000;i<5000;i++)
 { thou=i/1000;    hun=i%1000/100;
   ten=i%100/10;  data=i%10;
  if(thou+hun==ten+data&&thou+hun==(data-thou)*10) {cnt++;sum+=i;}
  }
}

void main()
{
 cnt=sum=0;
  countvalue();
 printf('满足条件的自然数的个数=%d/n',cnt);
 printf('满足条件的自然数的个数之和=%d/n',sum);
 writedat();
}

writedat()
{
 file *fp;
fp=fopen('out13.dat','w');
 fprintf(fp,'%d/n%d/n',cnt,sum);
 fclose(fp);
}


*****************************************************************************************
★☆题目68（无忧id 142  整数各位数字统计运算题）

已知数据文件in.dat中存有200个四位数，并已调用读函数readdat()把这些数存入数组a中，请考生编制一函数jsval()，其功能是：如果四位数各位上的数字均是奇数，则统计出满足此条件的个数cnt并把这些四位数按从大到小的顺序存入数组b中。最后main()函数调用写函数writedat( )把结果cnt以及数组b中符合条件的四位数输出到out.dat文件中。
    　注意：部分源程序存在文件prog1.c中。
    　程序中已定义数组：a[200]，b[200]，已定义变量：cnt
    　请勿改动数据文件in.dat中的任何数据、主函数main()、读函数readdat()和写函数writedat()的内容。
#include <stdio.h>
#define max  200
int a[max], b[max], cnt = 0 ;

void jsval()
{int i,j,thou,hun,ten,data;
 for(i=0;i<200;i++)
   {thou=a[i]/1000;  hun=a[i]%1000/100;
    ten=a[i]%100/10; data=a[i]%10;
    if(thou&&thou%2&&hun%2&&ten%2&&data%2)  b[cnt++]=a[i];
   }
 for(i=0;i<cnt-1;i++)
  for(j=i+1;j<cnt;j++)
    if(b[i]<b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;}
}

void readdat()
{
  int i ;
  file *fp ;
  fp = fopen('in.dat', 'r') ;
  for(i = 0 ; i < max ; i++) fscanf(fp, '%d', &a[i]) ;
  fclose(fp) ;
}

void main()
{
  int i ;
  readdat() ;
  jsval() ;
  printf('满足条件的数=%d/n', cnt) ;
  for(i = 0 ; i < cnt ; i++) printf('%d ', b[i]) ;
  printf('/n') ;
  writedat() ;
}
writedat()
{
  file *fp ;
  int i ;
  fp = fopen('out.dat', 'w') ;
  fprintf(fp, '%d/n', cnt) ;
  for(i = 0 ; i < cnt ; i++) fprintf(fp, '%d/n', b[i]) ;
  fclose(fp) ;
}


*****************************************************************************************
☆题目69（无忧id  145 整数统计运算题）

已知数据文件in.dat中存有200个四位数，并已调用读函数readdat()把这些数存入数组a中，请考生编制一函数jsval()，其功能是：把一个四位数的千位数字上的值减去百位数字上的值再减去十位数字上的值最后减去个位数字上的值，如果得出的值大于等于零且原四位数是奇数，则统计出满足此条件的个数cnt并把这些四位数按从小到大的顺序存入数组b中，最后调用写函数writedat()把结果cnt以及数组b中符合条件的四位数输出到out.dat文件中。
    　注意：部分源程序存在文件prog1.c中。
    　程序中已定义数组：a[200]，b[200]，已定义变量：cnt
    　请勿改动数据文件in.dat中的任何数据、主函数main()、读函数readdat()和写函数writedat()的内容。
#include <stdio.h>
#define max  200
int a[max], b[max], cnt = 0 ;

void jsval()
{int i,j,thou,hun,ten,data;
 for(i=0;i<200;i++)
   {thou=a[i]/1000;  hun=a[i]%1000/100;
    ten=a[i]%100/10; data=a[i]%10;
    if(thou-hun-ten-data>=0&&a[i]%2)  b[cnt++]=a[i];
   }
 for(i=0;i<cnt-1;i++)
  for(j=i+1;j<cnt;j++)
    if(b[i]>b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;}
}

void readdat()
{
  int i ;
  file *fp ;
  fp = fopen('in.dat', 'r') ;
  for(i = 0 ; i < max ; i++) fscanf(fp, '%d', &a[i]) ;
  fclose(fp) ;
}

void main()
{
  int i ;
  readdat() ;
  jsval() ;
  printf('满足条件的数=%d/n', cnt) ;
  for(i = 0 ; i < cnt ; i++) printf('%d ', b[i]) ;
  printf('/n') ;
  writedat() ;
}

writedat()
{
  file *fp ;
  int i ;
  fp = fopen('out.dat', 'w') ;
  fprintf(fp, '%d/n', cnt) ;
  for(i = 0 ; i < cnt ; i++) fprintf(fp, '%d/n', b[i]) ;
  fclose(fp) ;
}

*****************************************************************************************
★题目70（无忧id 41  整数统计运算题）

已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求这些数右移1位后，产生的新数是奇数的数的个数totcnt，以及满足此条件的这些数（右移前的值）的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。
   　部分源程序存在文件prog1.c中。
   　请勿改动主函数main()、读函数readdat()和写函数writedat()的内容。
#include <stdio.h>
#include <conio.h>
#define maxnum 200

int xx[maxnum];
int totnum=0; /*文件in.dat中共有多少个正整数*/
int totcnt=0; /*符合条件的正整数的个数*/
double totpjz=0.0;   /*平均值*/
int readdat(void);
void writedat(void);
void calvalue(void)
{int i,data;
for(i=0;i<maxnum;i++)
   if(xx[i]>0)
{ totnum++;
      data=xx[i]>>1;
      if(data%2){totcnt++;totpjz+=xx[i];}
     }
 if(totcnt==0) totpjz=0;
 else totpjz/=totcnt;
}

void main()
{
 int i;
 clrscr();
 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;
 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('out.dat','w');
 fprintf(fp,'%d/n%d/n%6.2f/n',totnum,totcnt,totpjz);
fclose(fp);
}


*****************************************************************************************