Senin, 03 Januari 2011

Operasi Perkarakter (3)

/*fle program : fgets.c
Membaca isi file teks*/
#include <stdio.h>
#include <conio.h>
#include <stdlib.h>
#define PANJANG 256
main()
{
      FILE*f_teks;
      char string[PANJANG];
      char namafile[65];
     
      printf("PROGRAM UNTUK MELIHAT ISI FILE TEKS\n\n");
      printf("Masukkan nama file: ");
      gets(namafile);
     
      printf("\nIsi dari file %s adalah sbb. ",namafile);
      if((f_teks=fopen(namafile,"rt"))==NULL)
      {
           printf("File gagal dibuka!\n");
           exit(1);
      }
      while(fgets(string, sizeof string,f_teks)!=NULL);
      printf("%s\n\n",string);
     
      fclose(f_teks);
      getch();
}

Operasi Perkarakter (2)

/*File program : fgetc.c
Membaca isi file perkarakter*/
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
main()
{
      FILE*pf;
      char kar;
     
      if((pf=fopen("COBA.TXT","r"))==NULL)
      {
          printf("file tak dapat dibuka!");
          exit(1);
      }
                                         
      while ((kar=fgetc(pf))!=EOF)
      putchar(kar);
                                         
      printf("\n");
      fclose(pf);
      getch();
}

Operasi Perkarakter ( 1 )

/*File program : fputc.c
Menciptakan dan mengisi file dengan data karakter dr keyboard*/
#include <stdio.h>
#include <stdlib.h>
main()
{
      FILE*pf;
      char kar;
      if( (pf=fopen("COBA.TXT","w"))==NULL)
      {
          printf("file tak dapat dikenali\n");
          exit(1);
          }
         
          printf("Ketik, akhiri dengan ENTER.\n");
          printf("Program baca perkarakter\n");
          printf("dan menyimpan dalam file COBA.TXT\n");
          while ((kar=getchar())!= '\n')
          fputc(kar, pf);
          fclose(pf);
          }