Minggu, 03 Juli 2011

soal nomor 4





# include
# include
# include
# include
# include

struct data {
char kode[15];
char nama[30];
char pendidikan[15];
char keahlian[30];

} pgw[50];

void menu();
void isi();
void tambah();
void baca();

void main()
{
char pil='0';
while (pil!='4')
{
menu();
pil=getche();
switch(pil)
{
case'1':
isi();break;
case'2':
tambah();break;
case'3':
baca();break;
case'4':
break;
}
}
}

void menu()
{
clrscr();
gotoxy(25,5);cout<<"MENU DATA BUDIDARMA"; gotoxy(25,6);cout<<"-------------------------------------"; gotoxy(25,7);cout<<"[1]Input data dosen"; gotoxy(25,8);cout<<"[2]Input data mahasiswa"; gotoxy(25,9);cout<<"[3]Membaca Data dosen"; gotoxy(25,10);cout<<"[4]Membaca data mahasiswa"; gotoxy(25,11);cout<<"[5]Keluar program"; gotoxy(25,12);cout<<"------------------------------------"; gotoxy(25,13);cout<<"PILIHAN :"; } void isi() { FILE *coba; char gj[10]; float atof(); int i,n=0; while(1) { clrscr(); gotoxy(35,5);cout<<"MEMASUKKAN DATA DOSEN"; gotoxy(35,6);cout<<"------------------------------------------"; gotoxy(35,7);cout<<"Kode Dosen :"; gets(pgw[n].kode); if(strlen(pgw[n].kode)==0) break; gotoxy(35,8);cout<<"Nama :"; gets(pgw[n].nama); gotoxy(35,9);cout<<"Pendidikan :"; cin>>pgw[n].pendidikan;
gotoxy(35,10);cout<<"keahlian :"; cin>>pgw[n].keahlian;
gotoxy(35,6);cout<<"--------------------------------------------"; n++; } coba=fopen("c:\\Pegawai.Dat","wb"); for(i=0;i>pgw[n].pendidikan;
gotoxy(35,10);cout<<"Keahlian :"; cin>>pgw[n].keahlian;
gotoxy(35,6);cout<<"---------------------------------------";
n++;
}
coba=fopen("c:\\Pegawai.Dat","ab");

for(i=0;i {
fwrite(&pgw[i],sizeof(pgw[i]),1,coba);
}
fclose(coba);
}

void baca()
{
FILE *coba;
int i=0,n=0;

clrscr();
coba=fopen("c:\\Pegawai.Dat","rb");
if(coba==NULL)
{
gotoxy(20,10);cout<<"File PEGAWAI.Dat belum ada";
gotoxy(20,12);cout<<"Tekan sembarang Tombol";
getch();
return;
}
gotoxy(5,1);cout<<"LAPORAN DATA PEGAWAI STMIK BUDIDARMA";
gotoxy(5,2);cout<<"----------------------------------------";
gotoxy(5,3);cout<<"NO KODE NAMA PENDIDIKAN KEAHLIAN ";
gotoxy(5,4);cout<<"----------------------------------------";
while((fread(&pgw[n],sizeof(pgw[n]),1,coba))==1)
{
i++;
gotoxy(6,4+i);cout< gotoxy(10,4+i);cout< gotoxy(19,4+i);cout< gotoxy(50,4+i);cout< gotoxy(60,4+i);cout< }
gotoxy(5,5+i);cout<<"--------------------------------------Design By: darminah";
getch();
fclose(coba);
}



soal nomor 3

#include
#include
#include
#include

struct pegawai
{
char nik[20];
char nama[20];
char kode[5];
char gaji[5];
char tunj[5];
char tunjkel[5];

}peg[30];

void main()
{
char lg='Y';
int hasil,i,n=0;
long gaji=0;
long tunj=0;
while(lg=='Y'||lg=='y')
{
clrscr();
cout<<"input data pegawai\n";
n++;
cout<<"nik :";
gets(peg[n].nik);
cout<<"Nama Pegawai :";
gets(peg[n].nama);
cout<<"kode jabatan :";
gets(peg[n].kode);
cout<<"gaji :";
gets(peg[n].gaji);
cout<<"tunjangan :";
gets(peg[n].tunj);
cout<<"Input lagi[Y/T] :";
lg=getche();
}


clrscr();
gotoxy(1,3);cout<<" = LAPORAN GAJI PEGAWAI =\n";
gotoxy(1,4);cout<<"----------------------------------------------------------------------";
gotoxy(1,5);cout<<"NIk Nama Kode Gaji tunjangan Total gaji";
gotoxy(1,6);cout<<"______________________________________________________________________";
for(i=1;i<=n;i++)
{
gotoxy(1,7+i);cout< gotoxy(9,7+i);cout< gotoxy(20,7+i);cout< gotoxy(40,7+i);cout<

hasil=strcmp(peg[i].kode,"1");
if (hasil==0)
gaji=2500000;

hasil=strcmp(peg[i].kode,"2");
if (hasil==0)
gaji=2000000;

hasil=strcmp(peg[i].kode,"3");
if (hasil==0)
gaji=1500000;

gotoxy(28,7+i);cout<

gotoxy(52,7+i);cout<
long tgaji=gaji+tunj+tunj kel;
gotoxy(63,7+i);cout<
}
gotoxy(1,14+i);cout<<"---------------------------------------------------------------------";
gotoxy(1,15+i);cout<<" = HORAS =";
getch();
}

kehidupan mahasiswa di kota besar

Kehidupan mahasiswa di era sekarang sangat memprihatinkan.Khususnya bagi mereka yang berdomisili di kota besar seperti Jakarta,Bandung,Surabaya,Malang,dan kota besar lainnya.Seringkali mahasiswa di identikkan dengan kata ”KEBEBASAN” sering di salah artikan oleh mereka.Mereka beranggapan bahwa ketika mereka telah keluar dari kehidupan di rumah mereka atau dalam arti lain mereka jauh dari orang tua karena harus belajar keluar kota,mereka akan bebas melakukan semua keinginan mereka termasuk mengatur hidup mereka selama mereka berada di domisili baru.Tetapi sebenarnya para orang tua mereka ingin pendidikan yang lebih berkualitas dan baik dengan menyuruh mereka kuliah di luar kota.Tetapi apa kenyataannya yang banyak terjadi,mereka salah menggunakan hal tersebut.Banyak dari mereka yang salah arus karena pengaruh lingkungan baru yang tidak sesuai dengan mereka,salah pergaulan,ataupun ingin merasa gaul atau keren.Dari faktor-faktor tersebut mereka banyak yang terjerumus ke hal-hal negatif seperti pergaulan bebas,narkoba,dll.Apakah mereka tdak sadar hal itui sangat merugikan bagi mereka sendiri???Padahal orang tua mereka di rumah bekerja keras mencari uang untuk membiayai kuliah tapi mereka malah berkelakuan seperti itu.