Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //Nhận xét
- hàm DocFile và GhiFile để làm cảnh hả em ?
- khi và chỉ khi mở file thì mới cần fclose, nghĩ sao trong hàm Xuatmang tự ý fclose vậy ?
- ở cái menu trong hàm main ấy, khi em mở file xong rồi thì nhớ đóng file lại nhé
- //Code
- #include<stdio.h>
- #include<conio.h>
- #include<math.h>
- int Sapxeptangdan(int a, int b)
- {
- return a>b;
- }
- int Sapxepgiamdan(int a, int b)
- {
- return a<b;
- }
- int SapxeptangdanDaiso(int a, int b)
- {
- return abs(a)>abs(b);
- }
- int SapxepgiamdanDaiso(int a, int b)
- {
- return abs(a)<abs(b);
- }
- int Sapxepsochan(int a, int b)
- {
- if(abs(a)%2==1||abs(b)%2==1)
- return 0;
- return a>b;
- }
- int Sapxep(int a[], int n, int (*Sosanh)(int,int))
- {
- int i,j,t;
- for(i=0;i<n;i++)
- {
- for(j=i+1;j<n;j++)
- {
- if(Sosanh(a[i],a[j]))
- {
- t=a[i];
- a[i]=a[j];
- a[j]=t;
- }
- }
- }
- }
- void Menu()
- {
- printf("Ban co cac lua chon sau.\n");
- printf("0.Thoat chuong trinh\n");
- printf("1.Nhap mang tu ban phim\n");
- printf("2.Nhap mang tu input.txt\n");
- printf("3.Xuat mang\n");
- printf("4.Xuat mang tu output.txt\n");
- printf("5.Sap xep tang dan\n");
- printf("6.Sap xep giam dan\n");
- printf("7.Sap xep tang dan theo gia tri dai so\n");
- printf("8.Sap xep giam dan theo gia tri dai so\n");
- printf("9.Sap xep so chan tang dan\n");
- }
- void Chon(int *pn)
- {
- printf("\nBan chon: ");
- scanf("%d",pn);
- }
- int Nhapmang(int a[],int *pn, FILE * fp)
- {
- int i;
- fscanf(fp,"%d",pn);
- for(i=0;i<*pn;i++)
- {
- fscanf(fp,"%d",&a[i]);
- }
- }
- void Xuatmang(int *a, int n, FILE * fp)
- {
- int i;
- for(i=0;i<n;i++)
- {
- fprintf(fp,"%d ",a[i]);
- }
- }
- int main()
- {
- int a[50];
- int n=0,chon;
- FILE *fp;
- Menu();
- while (1)
- {
- Chon(&chon);
- switch(chon)
- {
- case 0: return 0;
- break;
- case 1: Nhapmang(a,&n,stdin);
- break;
- case 2: fp=fopen("Input.txt","rt");
- Nhapmang(a,&n,fp);
- fclose(fp);
- break;
- case 3: Xuatmang(a,n,stdout);
- break;
- case 4: fp=fopen("Output.txt","wt");
- Xuatmang(a,n,fp);
- fclose(fp);
- break;
- case 5: Sapxep(a,n,Sapxeptangdan);
- break;
- case 6: Sapxep(a,n,Sapxepgiamdan);
- break;
- case 7: Sapxep(a,n,SapxeptangdanDaiso);
- break;
- case 8: Sapxep(a,n,SapxepgiamdanDaiso);
- break;
- case 9: Sapxep(a,n,Sapxepsochan);
- break;
- }
- }
- return 0;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement