Форум программистов [Powered by Invision Power Board]

Код

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define len 100 // максимальная длинна слов

#define inStr( report, str )  printf( report ); \
    scanf("%s", str ); \
    if( !strcmp( str, "end" )){ \
        delete c; \
        return NULL; }

#define inInt( report, a ) printf( report ); \
    if( !scanf( "%d", &a )){ \
    delete c; \
    return NULL; }

typedef struct CAR{
    char
        famile[len], // фамилия
        name[len], // имя
        patronymic[len], // фамилия
        brand[len]; // марка автомобиля
    int
        year, // год выпуска
        number; // номер автомобиля
    struct CAR * next;
}Car;

typedef struct NODE{
    Car * car; // указатель на авто
    struct NODE * next;
    int count; // количесто "подобных" авто
}Node;

Car * NewCar ( FILE * file ); // функция создаёт и заполняет структуру Car
void WriteList( FILE * file, Car * c ); // функция записи структуры
Car * ReadList( FILE * file, Car ** c ); // функция создаёт связанный список, возвращает первый элемент
void FreeCar( Car * c ); // удаление связанного списка
void IsOpen( FILE * file ); // если неможем открыть файл то выходим мз программы

/////////////// main ///////////////////
int main(int argc, char *argv[])
{ 
    // создание файла "A1.txt"
    FILE * file = fopen( "A1.txt", "w+" ); // файл для записи и чтения
    IsOpen( file );

    Car *begin = NULL, *node;
    ReadList( stdin, &begin );// читаем с консоли
    WriteList( file, begin ); // запись в файл
    FreeCar( begin ); // Удаление списка

    fflush( file );
    rewind( file );

    ReadList( file, &begin ); // счивываем данные из файла
    puts("\n\n\n_____Data is read file:_____ \n\n"); // Данные являются прочитанными из файла
    WriteList( stdout, begin ); // вывод прочитанных данных на консоль
    fclose( file );
    clearerr( file );
/*
Найти:
Число автомобилей каждой марки с учётом года выпуска. 
Эти сведения должны включать марку автомобиля, год выпуска, число автомобилей.
*/
    Node *beg = NULL, *en, *data;// список "похожих" авто
    // поиск "похожих" авто
    int flag=1;
    for( node = begin; node; node=node->next ){ //  перебираем все авто
        flag = 1;
        for( data = beg; data; data=data->next ){
            if( !strcmp( data->car->brand, node->brand ) && // если марки авто совпадают
                data->car->year == node->year && beg ){// если один и тотже год выпуска
                data->count++; // значит это ещё один "похожий" авто
                flag = 0;
                break;
            }// end fi
        }// end for Node
        if( flag ){ // если авто не похожи
            if( !beg ) beg = en = (Node*)malloc( sizeof(Node));
            else    en = en->next = (Node*)malloc( sizeof(Node));

            en->car = node;
            en->count = 1;
            en->next = NULL;
        }// end if
    }// end for Car

    file = fopen("A2.txt", "w"); // файл для записи
    // вывод строки :"Число автомобилей каждой марки с учётом года выпуска:"
    puts("\n\nNumber of cars of every brand taking into account the year of release:\n");

    for( data = beg; data;  ){
        printf("%s  %d,  count = %d\n", data->car->brand, data->car->year, data->count );
        fprintf( file, "%s  %d,  count = %d\n", data->car->brand, data->car->year, data->count );
        data = data->next;
        free(beg); // удаление элемента из списка
        beg = data;
    }
    FreeCar( begin ); // Удаление списка
    fclose( file );
    puts("\n\nPress the key ENTER for the program exit");
    fflush(stdin);
    getchar(); // пауза
    return 0;
}
///////////////// End main //////////////////////

Car * NewCar ( FILE * file ){
    Car * c = (Car*) malloc( sizeof(Car));
    if( file != stdin ){ // если читаем из файла
        if( fscanf( file, "%s%s%s%s%d%d", c->famile, c->name , c->patronymic, c->brand,
            &c->year, &c->number ) <=0 ){
            free( c );
            return NULL;
        }
    }
    else{ // если читаем с консоли
        puts("\nNew Car, \"end\" - to exit :");
        inStr( "famile > ", c->famile );
        inStr( "name > ", c->name );
        inStr( "patronymic > ", c->patronymic );
        inStr( "brand car > ", c->brand );
        inInt( "year > ", c->year );
        inInt( "nubber car > ", c->number );
    }
    c->next = NULL;
    return c;
}
void WriteList( FILE * file, Car * c ){
    for(; c; c=c->next )
        fprintf( file, "%s %s %s %s %d %d\n", c->famile, c->name , c->patronymic, c->brand,
            c->year, c->number );
}
Car * ReadList( FILE * file, Car ** c ){
    Car *end = NULL, *node; // указатели на конец, и добавляемый элемент (автомобиль)
    // цикл чтения, пока читается...
    while(( node = NewCar( file )) != NULL ){
        if( !end ) *c = end = node; // если "вставляем" первый раз
        else{
            end->next = node; // указатель последнего на новый элемент
            end = node; // указатель конца на новый эл.
        }
    }
    return *c;
}
void FreeCar( Car * c ){
    Car * a;
    while( c ){
        a = c;
        c = c->next;
        delete a;
    }
}
void IsOpen( FILE * file ){
    if( !file ){
        puts("\n\nError open file !!!");
        puts("\n\nPress the key ENTER for the program exit");
        fflush( stdin );
        getchar();
        exit(1);
    }
}