Advertisement
machkovskitomche

datoteki/ispitna

Sep 2nd, 2018
211
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 1.74 KB | None | 0 0
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3.  
  4. int main(int argc,char *argv[])
  5. {
  6.     if(argc!=3)
  7.     {
  8.         return -1;
  9.     }
  10.  
  11.     FILE *in,*out;
  12.  
  13.     in = fopen(argv[1],"r");
  14.     if(in==NULL)
  15.     {
  16.         return -1;
  17.     }
  18.  
  19.     out = fopen(argv[2],"w");
  20.     if(out==NULL)
  21.     {
  22.         printf("Ne moze da se kreira datoteka\n");
  23.         return -1;
  24.     }
  25.  
  26.     char red[100];
  27.     int i;
  28.     while((fgets(red,100,in))!=NULL)
  29.     {
  30.         for(i=0;i<strlen(red);i++)
  31.         {
  32.             int br=1;
  33.             if(isalpha(red[i]))
  34.             {
  35.  
  36.                 if(red[i]==red[i+1])
  37.                 {
  38.                     fprintf(out,"%c",red[i]);
  39.                     while(red[i]==red[i+1])
  40.                     {
  41.                         fprintf(out,"%c",red[i+1]);
  42.                         br++;
  43.                         i++;
  44.                     }
  45.  
  46.                     while(br>0)
  47.                     {
  48.                         i++;
  49.                         br--;
  50.                     }
  51.                 }
  52.                 else
  53.                 {
  54.                     fprintf(out,"%c",red[i]);
  55.                 }
  56.             }
  57.             else
  58.             {
  59.                 fprintf(out,"%c",red[i]);
  60.             }
  61.  
  62.  
  63.         }
  64.     }
  65.     return 0;
  66. }
  67. //Програмата треба да ги најде оние букви во влезната
  68. датотека кои што се повторуваат последователно во серија. Програмата треба да не печати во излезната датотека
  69. онолку знаци колку што биле пронајдени исти букви во серија (почнувајќи после серијата на исти букви).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement