All pastes #610558 Raw Edit

Buku

public c v1 · immutable
·published 2007-07-09 15:14 UTC
rendered paste body
#include<stdio.h>#include<conio.h>#include<process.h>main(){clrscr();FILE *f_struktur;char jawaban,pilihan;int fclose(FILE *f_struktur);	struct data_pustaka	{ char nim[8],nama[30];	  char judul[50];	  char penerbit[30];	  char pengarang[30];	  int jlh;	} buku;	if ((f_struktur=fopen("DAFBUKU.DAT","wb")) ==NULL)	{	cputs("File tak dapat diciptakan!\r\n");	exit(1);	}	pilihan = getche();	do	{	switch(pilihan)	{	case 1 : cputs("No Anggota   :");		 gets(buku.nim);		 cputs("Nama Anggota :");		 gets(buku.nama);		 break;	case 2 :cputs("Judul Buku 	:");		gets(buku.judul);		cputs("Pengarang	:");		gets(buku.pengarang);		cputs("Penerbit	:");		gets(buku.penerbit);		cputs("Jumlah Buku	:");		scanf("%d", &buku.jlh);		break;	}	fflush(stdin);	fwrite(&buku, sizeof(buku),1,f_struktur);	cputs("\r\nInput Data Lagi(Y/T)?");	jawaban=getche();	}	while (jawaban=='Y' || jawaban=='y');	fclose(f_struktur);getch();}