#include "stdafx.h"
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <conio.h>
#include <stdlib.h>
#include <math.h>
#include <locale.h>

void read_print_ussr(FILE* filein);
void job(FILE*filein, FILE*temp);
void res(FILE*temp, FILE*fileout);

struct types
{
    char ed_ezmereniya[30];
    char name[30];
    float year13;
    float year28;
    float year40;
    float year58;

} result;

struct output
{
    char name[30];
    int prirost1;
    int prirost2;

} output;

void main(int argc, char *argv[])
{
    setlocale(LC_ALL, "rus");
    system("color F0");
    char file_name[13];
    char file_name2[13];
    FILE * filein;
    FILE * fileout;
    FILE * temp;
    int pr;
    printf("Ââåäèòå èìÿ èñõîäíîãî ôàéëà\n");
    gets(file_name);
    filein = fopen(file_name, "w+");
    printf("Ââåäèòå èìÿ ôàéëà âûâîäà\n");
    gets(file_name2);
    fileout = fopen(file_name2, "w+");
    temp = fopen("temp.txt", "w+");

    if (argc == 0)
    {
        printf("Ïðè âûçîâå óêàæèòå èìÿ ôàéëà!\n");
        exit(-1);
    }
    if (filein == NULL)
    {
        printf("Ôàéë %s íå îòêðûò!\n", file_name);
        exit(-1);
    }
    if (fileout == NULL)
    {
        printf("Ôàéë %s íå îòêðûò\n", file_name2);
        exit(-1);
    }
    read_print_ussr(filein);
    filein = fopen(file_name, "r");
    job(filein, temp);
    fileout = fopen(file_name2, "w");
    temp = fopen("temp.txt", "r");
    res(temp, fileout);
    system("pause");
}
void read_print_ussr(FILE * filein)
{
    int i = 0, err = 0, counter = 0, counter2 = 0, error;
    int flag;
    int r;
    float temp;
    char temp1[20];
    char top[120] = "---------------------------------------------------------------------------------------------";
    /*fprintf(filein, "%s\n", top);
    fprintf(filein, "      Èìÿ       Åä. èçì.     |     1913     |     1928     |     1940     |     1958\n");
    fprintf(filein, "%s\n", top);*/
    do
    {
        printf("Ââåäèòå íàèìåíîâàíèå òîâàðà\n");
        scanf("%s", &result.name);
        printf("Ââåäèòå åäèíèöó èçìåðåíèÿ òîâàðà\n");
        scanf("%s", &result.ed_ezmereniya);

        do
        {
            printf("Ââåäèòå ïîêàçàòåëü òîâàðà çà 1913\n");
            err = scanf("%f", &temp);

            fflush(stdin);
        } while (err == 0);
        result.year13 = temp;
        do
        {
            printf("Ââåäèòå ïîêàçàòåëü òîâàðà çà 1928\n");
            err = scanf("%f", &temp);

            fflush(stdin);
        } while (err == 0);
        result.year28 = temp;
        do
        {
            printf("Ââåäèòå ïîêàçàòåëü òîâàðà çà 1940\n");
            err = scanf("%f", &temp);
            fflush(stdin);
        } while (err == 0);
        result.year40 = temp;

        do
        {
            printf("Ââåäèòå ïîêàçàòåëü òîâàðà çà 1958\n");
            err = scanf("%f", &temp);

            fflush(stdin);
        } while (err == 0);
        result.year58 = temp;

        printf("Õîòèòå ëè ââåñòè åùå äàííûå: 1/0\n");
        scanf("%d", &flag);
        if (flag==1)
        {
            error = 1;
        }
        if (flag!=1)
        {
            error = 0;
        }
        fprintf(filein, "%10s     %10s     %10.1f     %10.1f    %10.1f     %10.1f\n", result.name, result.ed_ezmereniya,
            result.year13, result.year28, result.year40, result.year58);
        counter++;
    }while (error);
    fclose(filein);

}

void job(FILE*filein, FILE*temp)
{
    while (!feof(filein))
    {
        fscanf(filein, "%s%s%f%f%f%f\n", &result.name, &result.ed_ezmereniya,
            &result.year13, &result.year28, &result.year40, &result.year58);
        if (strncmp(result.ed_ezmereniya, "tis.ton", 8) == 0)
        {
            if ((result.year13 <= result.year28) && (result.year28 <= result.year40) && (result.year40 <= result.year58))
            {
                fprintf(temp, "%s     %s     %f     %f    %f     %f\n", result.name, result.ed_ezmereniya, result.year13, result.year28, result.year40, result.year58);
            }

        }

    }
    fclose(filein);
    fclose(temp);
}
void res(FILE*temp, FILE*fileout)
{

    if (getc(temp)!=EOF)
    {
        while (!feof(temp))
        {
            fscanf(temp, "%s%s%f%f%f%f\n", &result.name, &result.ed_ezmereniya,
                &result.year13, &result.year28, &result.year40, &result.year58);
            strncpy(output.name, result.name, 8);
            output.prirost1 = (result.year40 * 100 / result.year28) - 100;
            output.prirost2 = (result.year58 * 100 / result.year28) - 100;
            fprintf(fileout, "Íå ñíèçèëîñü ïðîèçâîäñòâî òîâàðà âèäà:  %10s\n ïðîöåíò ïðèðîñòà 1940ãîäà â ñðàâíåíèè "
                "ñ 1928 : %d%\nnðîöåíò ïðèðîñòà 1958ãîäà â ñðàâíåíèè ñ 28 : %d%\n", output.name, output.prirost1, output.prirost2);
        }

    }
    else if (getc(temp) == EOF)
    {
        printf("Íóæíûõ äàííûõ íå íàéäåíî\n");
    }

    fclose(temp);
    fclose(fileout);

}