#include <cstdlib>
#include <iostream>
#include <stdio.h>

using namespace std;

//создание текстового файла dat.txt из n действительных чисел
void create()
{
    srand(time(NULL));
    FILE *f;
    int n;
    printf("create file of real numbers\n");
    printf("Numbers of real numbers:  n = ");
    scanf("%d",&n); 
    f=fopen("dat.txt", "w");  
    for (int i=0; i<n; i++)
      {
          float p=(float) rand()*2000/RAND_MAX - 1000;
          fprintf(f,"%15.9f\n",p); 
      }
    fclose(f);    
};


//проверка существовавния текстового файла dat.txt  
int experiment() 
{
    FILE *f;
    f=fopen("dat.txt", "r");
    if (f == NULL)  return 1;
    fclose(f);
};

//копирование данных из текстового файла dat.txt в бинарный файл datb.bin
int createbin() 
{
    FILE *f;  
    FILE *g;
    f=fopen("dat.txt", "r");
    int m=0;  
    float p;
    while(!feof(f)) 
    {
        fscanf(f, "%f", &p);
        m++;    
    }
    m--;
    fclose(f);
    float *a = new float[m];
    f=fopen("dat.txt", "r");
    for (int i=0; i<m; i++)  fscanf(f, "%f", &a[i]);
    fclose(f);
    g=fopen("datb.bin", "wb");
    fwrite(a, sizeof(float), m, g );
    fclose(g);
    return m; 
};

//чтение данных из бинарного файла datb.bin
//создание 6 новых файлов:
//minus.txt - текстовый файл из отрицательных чисел файла datb.bin
//minusb.bin - бинарный файл из отрицательных чисел файла datb.bin
//plus.txt - текстовый файл из неотрицательных чисел файла datb.bin
//plusb.bin - бинарный файл из неотрицательных чисел файла datb.bin
//sort.txt - текстовый файл из чисел файла datb.bin в порядке неубывания 
//sortb.bin - бинарный файл из чисел файла datb.bin в порядке неубывания

void dif(int r) //параметр r - это количество чисел в бинарном файле datb.bin
{
  FILE *h;
  FILE *p;
  FILE *q;
  FILE *s;
  FILE *pb;
  FILE *qb;
  FILE *sb;
  int k1=0; //количество отрицательных чисел в бинарном файле datb.bin
  int k2=0; //количество неотрицательных чисел в бинарном файле datb.bin
  float *c=new float[r];
  h=fopen("datb.bin", "rb");
  fread(c, sizeof(float), r, h);
  fclose(h);
  int i; 
  for (i=0; i<r; i++)  if (c[i]<0) k1++; else k2++;  
  float *x=new float[k1];
  float *y=new float[k2];
  int i1=0;
  int i2=0; 
  q=fopen("minus.txt", "w");
  p=fopen("plus.txt", "w");
     for (i=0; i<r; i++) 
     if (c[i]<0) {x[i1]=c[i]; i1++; fprintf(q,"%15.9f\n", c[i]);}  
     else        {y[i2]=c[i]; i2++; fprintf(p,"%15.9f\n", c[i]);}
  fclose(p);
  fclose(q);
  qb=fopen("minusb.bin", "wb");
  fwrite(x, sizeof(float), k1, qb);
  fclose(qb);
  pb=fopen("plusb.bin", "wb");
  fwrite(y, sizeof(float), k2, pb);   
  fclose(qb);
  float buf; int min;   
  for (i=0; i<r-1; i++)
      {
            min=i;
            for (int j=i+1; j<r; j++) if (c[j]<c[min]) min=j;
            buf=c[i];
            c[i]=c[min];
            c[min]=buf;
      }
  s=fopen("sort.txt", "w");
  for (i=0; i<r; i++)  fprintf(s, "%15.9f\n", c[i]);
  fclose(s);
  sb=fopen("sortb.bin", "wb");
  fwrite(c, sizeof(float), r, sb);
  fclose(sb);
}

int main(int argc, char *argv[])
{   
    int v;
    v=experiment();
    if (v==1) 
      {
            printf("No textfile dat.txt. Create it\n ");
            create();
       }
    int k;
    k=createbin();
    dif(k);
    system("PAUSE");
    return EXIT_SUCCESS;
}