Определить без повторения слова текста, у которых первая и последняя буквы совпадают - C (СИ)
Формулировка задачи:
Ввести текст произвольного содержания в память ПЭВМ. Вывести на экран. Записать текст в файл.
После записи текста в файл информация должна быть сохранена, и при последующем выходе из программы и новой её загрузке должно произойти корректное считывание информации из файла и дальнейшее её использование.
Вывести текст из файла на экран.
Определить без повторения слова текста, у которых первая и
последняя буквы совпадают.
Решение задачи: «Определить без повторения слова текста, у которых первая и последняя буквы совпадают»
textual
Листинг программы
#include <windows.h> #include <string.h> #include <conio.h> #include <stdio.h> #include <fcntl.h> #include <io.h> #include <sys\types.h> #include <sys\stat.h> #include <errno.h> #define SIZE 81 #define HALT "" char* Rus(const char* text); void main(void); int input_text(void); int read_file_text(int base); int read_file_text_add(int base); int write_file_text(int base, unsigned int pos, char* rea); unsigned int get_rec_count(int base); char **ptstr; /*указатель на массив указателей, которые содержат адреса строк*/ char **ptwords; /*указатель на массив указателей, которые содержат адреса слов в строке*/ int ct=0; /* счетчик вводимых строк */ int ct_words=0; /* счетчик слов в строке */ int ct_dob_nach=0; /* счетчик введенных строк для добавления в начало файла*/ int ct_dob_konec=0; /* счетчик введенных строк для добавления в конец файла*/ int* inp_1; int* inp_zap; int count_massiv; void main(void) { int count; int var; int var_ch=-1; int read_c; int base; int i=0; int priz_vvod; int rea; int priz_otr=0; int priz_pol=0; int priz_work; static char buffer_read[1]; base=open("base.dat",O_RDONLY); if(base==-1) { base=open("base.dat",O_CREAT|O_BINARY,S_IREAD|S_IWRITE); close(base); base=open("base.dat",O_RDWR|O_BINARY,S_IREAD|S_IWRITE); system("cls"); printf(Rus("Файл для записи массива создан.Данных в нём нет.\n")); printf(Rus("Для продолжения-ENTER.\n")); getch(); } else { read_c=read(base,buffer_read,1); if(read_c) { system("cls"); printf(Rus("Файл данных уже существует.В нём имеются данные.\n")); close(base); base=open("base.dat",O_RDWR|O_BINARY,S_IREAD|S_IWRITE); printf(Rus("Для продолжения-ENTER.\n")); getch(); } else { system("cls"); printf(Rus("Файл данных уже существует.Данных в нём нет.\n")); close(base); base=open("base.dat",O_RDWR|O_BINARY,S_IREAD|S_IWRITE); printf(Rus("Для продолжения-ENTER.\n")); getch(); } } do { system("cls"); printf(Rus("Выберите пункт меню работы программы:\n")); printf(Rus("\n1) Ввод текста в оперативную память.")); printf(Rus("\n2) Просмотр содержимого текста в оперативной памяти.")); printf(Rus("\n3) Запись текста из оперативной памяти в файл.")); printf(Rus("\n4) Считывание текста из файла в оперативную память.")); printf(Rus("\n5) Корректировка содержимого текста в файле.")); printf(Rus("\n6) Обработка текста согласно условию.")); printf(Rus("\n7) Завершение работы.\n")); scanf("%d",&var); switch (var) { case 1: //ввод текста в оперативную память { getchar(); system("cls"); priz_work=0; ct=0; priz_work=input_text(); if(!priz_work) printf(Rus("\nТекст введен в память успешно.\n")); else printf(Rus("\nПроблемы с выделением памяти при вводе текста и записи в файл.\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 2: //Просмотр содержимого текста из оперативной памяти { system("cls"); if(ptstr) { puts(Rus("\nТекст, находящийся в данный момент в оперативной памяти:\n")); if(ct_dob_nach) for(i=0;i<ct_dob_nach;i++) printf("%s\n",ptstr[i]); else for(i=0;i<ct;i++) printf("%s\n",ptstr[i]); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } else { printf(Rus("Текст не введен в оперативную память.\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } } break; case 3: //Запись текста из оперативной памяти в файл. { getchar(); system("cls"); if(ptstr) { priz_work=0; if(base) close(base); base=open("base.dat",O_RDWR|O_BINARY|O_TRUNC,S_IREAD|S_IWRITE); for(i=0;i<ct;i++) { priz_work=write_file_text(base,strlen(ptstr[i]),ptstr[i]); if(priz_work) break; } printf(Rus("Текст записан в файл успешно.\n")); } else printf(Rus("Текст не введен в оперативную память. Записывать в файл нечего\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 4: //Считывание текста из файла и вывод на экран { ct=0; getchar(); system("cls"); priz_work=0; ct_dob_nach=0; lseek(base,0,SEEK_SET); read_c=read(base,buffer_read,1); if(read_c) { priz_work=read_file_text(base); if(!priz_work) puts(Rus("\nСчитывание текста из файла в оперативную память прошло успешно:\n")); else printf(Rus("\nПроблемы с выделением памяти при считывании текста в оперативную память из файла.\n")); } else printf(Rus("Текст в файле отсутствует\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 5: //корректировка содержимого файла { do { printf(Rus("Выберите требуемый вариант пункта подменю:\n")); printf(Rus("\n1) Добавление информации из оперативной памяти в начало файла")); printf(Rus("\n2) Добавление информации из оперативной памяти в конец файла")); printf(Rus("\n3) Удаление информации из файла")); printf(Rus("\n4) Возврат в предыдущее меню\n")); scanf("%d",&var_ch); switch(var_ch) { case 1: { getchar(); system("cls"); priz_work=0; if(ptstr) { lseek(base,0,SEEK_SET); read_c=read(base,buffer_read,1); if(read_c) { ct_dob_nach=ct; priz_work=read_file_text_add(base); if(!priz_work) { if(base) close(base); base=open("base.dat",O_RDWR|O_BINARY|O_TRUNC,S_IREAD|S_IWRITE); for(i=0;i<ct;i++) { priz_work=write_file_text(base,strlen(ptstr[i]),ptstr[i]); if(priz_work) break; } if(!priz_work) { printf(Rus("\nДобавление содержимого оперативной памяти в начало файла прошло успешно:\n")); if(ptstr) { for(i=ct_dob_nach;i<ct;i++) if(ptstr[i]) free(ptstr[i]); } } else printf(Rus("\nПроблемы с добавлением текста в начало файла.\n")); } else printf(Rus("\nПроблемы с добавлением текста в начало файла.\n")); } else printf(Rus("Текст в файле отсутствует\n")); } else printf(Rus("Текст в оперативной памяти отсутствует\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 2: { getchar(); system("cls"); if(ptstr) { priz_work=0; if(base) close(base); base=open("base.dat",O_RDWR|O_BINARY|O_TRUNC,S_IREAD|S_IWRITE); for(i=0;i<ct;i++) { priz_work=write_file_text(base,strlen(ptstr[i]),ptstr[i]); if(priz_work) break; } printf(Rus("Текст записан в файл успешно.\n")); } else printf(Rus("Текст не введен в оперативную память. Записывать в файл нечего\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 3: { if(base) close(base); base=open("base.dat",O_RDWR|O_BINARY|O_TRUNC,S_IREAD|S_IWRITE); printf(Rus("Информация из файла удалена.\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 4: break; default: printf(Rus("Ошибка: некорректный ввод варианта работы")); } } while (var_ch!=4); var_ch=-1; } break; case 6: //обработка информации { if(inp_1) { for(i=0;i<count_massiv;i++) { if(*(inp_1+i)<0) { printf(Rus("Первый отрицательный элемент стоит на %d месте и равен %d\n"),i+1,*(inp_1+i)); priz_otr++; break; } } for(i=count_massiv-1;i>0;i--) { if(*(inp_1+i)>0) { printf(Rus("Последний положительный элемент стоит на %d месте и равен %d\n"),i+1,*(inp_1+i)); priz_pol++; break; } } if(!priz_otr) printf(Rus("Отрицательные элементы в исходном массиве отсутствуют\n")); if(!priz_pol) printf(Rus("Положительные элементы в исходном массиве отсутствуют\n")); } else printf(Rus("Данные в исходном массиве отсутствуют\n")); printf(Rus("\nДля продолжения-<ENTER>:\n")); getch(); } break; case 7: break; default: printf(Rus("Ошибка: некорректный ввод варианта работы")); } } while(var!=7); close(base); } int input_text(void) { int i; int priz_work=0; if(ptstr) { for(i=0;i<ct;i++) if(ptstr[i]) free(ptstr[i]); free(ptstr); } ct=0; ptstr=(char **)calloc(1,sizeof(char *)); if(ptstr) { ptstr[ct]=(char *)malloc(81*sizeof(char)); if(ptstr[ct]) { printf(Rus("Введите строки и они будут обработаны.\n")); printf(Rus("Для прекращения ввода-<Enter> в начале строки.\n")); while(gets_s(ptstr[ct],80)!=NULL && strcmp(ptstr[ct],HALT)!=0 && priz_work==0) { ct++; ptstr=(char **)realloc(ptstr,(ct+1)*sizeof(char *)); if(!ptstr) { printf(Rus("Нет возможности перевыделить память под указатель на массив указателей, которые содержат адреса строк\n")); priz_work++; } else { ptstr[ct]=(char*)malloc(81*sizeof(char)); if(!(ptstr[ct])) { printf(Rus("Нет возможности выделить память под %d строку текста\n"),ct); priz_work++; } } } } else printf(Rus("Нет возможности выделить память под первую строку текста\n")); } else printf(Rus("Нет возможности выделить память под указатель на массив указателей, которые содержат адреса строк\n")); return priz_work; } int read_file_text(int base) { int i; int read_c; static char buffer_read[2]; int priz_work=0; lseek(base,0,SEEK_SET); if(ptstr) { for(i=0;i<ct;i++) if(ptstr[i]) free(ptstr[i]); free(ptstr); } ct=0; ptstr=(char **)calloc(1,sizeof(char *)); if(ptstr) { ptstr[ct]=(char *)calloc(81,sizeof(char)); if(ptstr[ct]) { while(!eof(base)) { read_c=read(base,buffer_read,1); if(read_c!=-1) if(*buffer_read!='\n') strcat(ptstr[ct],buffer_read); else { strcat(ptstr[ct],"\0"); ct++; ptstr=(char **)realloc(ptstr,(ct+1)*sizeof(char *)); if(!ptstr) { printf(Rus("Нет возможности перевыделить память под указатель на массив указателей, которые содержат адреса строк\n")); priz_work++; } else { ptstr[ct]=(char*)calloc(81,sizeof(char)); if(!(ptstr[ct])) { printf(Rus("Нет возможности выделить память под %d строку текста\n"),ct); priz_work++; } } } else printf(Rus("Ошибка при считывании текста из файла")); } } else printf(Rus("Нет возможности выделить память под первую строку текста\n")); } else printf(Rus("Нет возможности выделить память под указатель на массив указателей, которые содержат адреса строк\n")); return priz_work; } int read_file_text_add(int base) { int i; int read_c; static char buffer_read[2]; int priz_work=0; lseek(base,0,SEEK_SET); if(ptstr) { ptstr=(char **)realloc(ptstr,(ct+1)*sizeof(char *)); if(ptstr) { ptstr[ct]=(char *)calloc(81,sizeof(char)); if(ptstr[ct]) { while(!eof(base)) { read_c=read(base,buffer_read,1); if(read_c!=-1) if(*buffer_read!='\n') strcat(ptstr[ct],buffer_read); else { strcat(ptstr[ct],"\0"); ct++; ptstr=(char **)realloc(ptstr,(ct+1)*sizeof(char *)); if(!ptstr) { printf(Rus("Нет возможности перевыделить память под указатель на массив указателей, которые содержат адреса строк\n")); priz_work++; } else { ptstr[ct]=(char*)calloc(81,sizeof(char)); if(!(ptstr[ct])) { printf(Rus("Нет возможности выделить память под %d строку текста\n"),ct); priz_work++; } } } else { printf(Rus("Ошибка при считывании текста из файла")); priz_work++; } } } else { printf(Rus("Нет возможности выделить память под первую строку текста\n")); priz_work++; } } else { printf(Rus("Нет возможности выделить память под указатель на массив указателей, которые содержат адреса строк\n")); priz_work++; } } else { printf(Rus("В оперативной памяти нет текста, который нужно добавить в начало файла.\n")); priz_work++; } return priz_work; } int write_file_text(int base, unsigned int pos, char* rea) { int write_c=0; int priz_zap=0; lseek(base,0,SEEK_END); write_c=write(base,rea,sizeof(char)*pos); if(write_c == -1) { priz_zap=1; printf(Rus("\nПроблемы с записью в файл непосредственно текста.\n")); } write_c=write(base,"\n",1); if(write_c == -1) { priz_zap=2; printf(Rus("\nПроблемы с записью в файл признака конца строки.\n")); } return priz_zap; } unsigned int get_rec_count(int base) { long cur_pos=tell(base); lseek(base,0,SEEK_END); long count_r = tell(base) / sizeof(int); lseek(base, cur_pos, SEEK_SET); return(count_r); } char bufRus[256]; char* Rus(const char* text) { CharToOemA(text, bufRus); return bufRus; }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д