pro-w.c

来自「按照既定的步长」· C语言 代码 · 共 57 行

#include"math.h"
#include"stdio.h"
#include<stdio.h>
main()
{    
        FILE *fpi;
        FILE *fpo;                      
     
        double c1,c3;            
    
        double rr[6];
        double pp[6]; 
        double tt[6];
                           
        int i,j,k;   i=j=k=0;
     
        printf("Please enter the step: ");
        scanf("%lf",&c3);      

      if((fpi=fopen("E:\\data\\wxf1.txt","r"))==NULL) 
                                              /*请在“”内输入要处理的文件*/
         {  printf("Can not open this file!");
            exit(0); } 
      fpo=fopen("E:\\data\\wxf2.txt","a");           
                                              /*请在“”内输入存放结果的文件*/       
          
      
  
      while(fscanf(fpi,"%lf%lf%lf%lf%lf%lf",&rr[0],&rr[1],&rr[2],&rr[3],&rr[4],&rr[5])>0)        
         { k++;
           c1=rr[1]-pp[1];                      
             
           if(fabs(c1)>c3)
            {  if(k>1)
                  fprintf(fpo,"%-8.3lf %8.4lf %8.3lf %8.3lf %8.3lf %8.0lf\n",tt[0],tt[1],tt[2],tt[3],tt[4],tt[5]);

                for(j=0;j<6;j++)
                  pp[j]=rr[j];

                fprintf(fpo,"%-8.3lf %8.4lf %8.3lf %8.3lf %8.3lf %8.0lf\n",pp[0],pp[1],pp[2],pp[3],pp[4],pp[5]); 

               k=0;             
            }
            for(j=0;j<6;j++)
                 tt[j]=rr[j];   
                     
         }
      if(k>0)
         fprintf(fpo,"%-8.3lf %8.4lf %8.3lf %8.3lf %8.3lf %8.0lf\n",tt[0],tt[1],tt[2],tt[3],tt[4],tt[5]);

     fclose(fpi);
     fclose(fpo); 

     exit(0);

    getch();    /* 请不要删除此行 */
}