Program-Kelulusan-Smp-dan-Psb-Sma-Ver1/

#include
#include

long main()
{
printf(“Program Prediksi kelulusan + PSB SMA… \n”);
//ini untuk memasukkan nilai b.indonesia
int bindo;
printf(“Berapa nilai B.Indonesia mu? “); scanf(“%d”,&bindo);
if (bindo< =45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai b.inggris
int binggo;
printf("Berapa nilai B.Inggris mu? "); scanf("%d",&binggo);
if (binggo<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai mtk
int mtk;
printf("Berapa nilai MTK mu? "); scanf("%d",&mtk);
if (mtk<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai kimia
int kimi;
printf("Berapa nilai Kimia mu? "); scanf("%d",&kimi);
if (kimi<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai biologi
int bio;
printf("Berapa nilai Biologi mu? "); scanf("%d",&bio);
if (bio<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai fisika
int fisi;
printf("Berapa nilai Fisika mu? "); scanf("%d",&fisi);
if (fisi<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//rata-rata uan
long int hasil;
hasil=((mtk+bio+kimi+bindo+binggo+fisi)/6);
printf("Hasil rata-rata UAN mu: %d",hasil);

//goto untuk menuju ke fungsi masuk sma
int psb;
printf("\nMasukkan nilai rata-rata uan mu:.."); scanf("%d",&psb);
if (psb<=70)
printf("Masuk SMA N 60 Jakarta...\n");
else
if(psb<=75)
printf("Masuk SMA N 6 Jakarta..\n");
else
if(psb<=80)
printf("Masuk SMA N 70..\n");
else
if(psb<=85)
printf("Masuk SMA N 55 Jakarta..\n");
else
if(psb<=90)
printf("Masuk SMA N 28 Jakarta..\n");
else
if(psb>=90)
printf(“Masuk SMA N 8 Jakarta..\n”);
else
printf(“Masuk mana ya…\n”);

}

Sumber  nusinau.com

Program-Kelulusan-Smp-dan-Psb-Sma-Ver2

#include
#include
void menu();
void uan();
void psb();

void main()
{
char chrPilihan;
do
{
menu();
fflush(stdin);
scanf(“%c”,&chrPilihan);
if ((chrPilihan == ‘x’)||(chrPilihan == ‘x’))
{ printf(“Thanks for use this program… egie_ku@yahoo.com”);
break;}

switch (chrPilihan)
{ case ’1′:
uan();
break;
case ’2′:
psb();
break;

default:
printf(“\nSorry bro.. Kode yang di imput salah…\n”);
}
}
while(chrPilihan != ‘x’);
}
void menu()
{
printf(” \n”);
printf(“Main Menu\n”);
printf(“==================\n”);
printf(“1. Prediksi Kelulusan Kamu !!!\n”);
printf(“2. Prediksi PSB SMA dengan Nilai UAN mu..\n”);
printf(“x. Untuk Keluar\n”);
printf(” \n”);
printf(“Input kode masukkan,bro!!: “);
}
void uan()
{
int uan;
printf(“Program Prediksi kelulusan + PSB SMA… \n”);
//ini untuk memasukkan nilai b.indonesia
int bindo;
printf(“Berapa nilai B.Indonesia mu? “); scanf(“%d”,&bindo);
if (bindo< =45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai b.inggris
int binggo;
printf("Berapa nilai B.Inggris mu? "); scanf("%d",&binggo);
if (binggo<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai mtk
int mtk;
printf("Berapa nilai MTK mu? "); scanf("%d",&mtk);
if (mtk<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai kimia
int kimi;
printf("Berapa nilai Kimia mu? "); scanf("%d",&kimi);
if (kimi<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai biologi
int bio;
printf("Berapa nilai Biologi mu? "); scanf("%d",&bio);
if (bio<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");

//ini untuk memasukkan nilai fisika
int fisi;
printf("Berapa nilai Fisika mu? "); scanf("%d",&fisi);
if (fisi<=45)
printf("Tidak Lulus..\n");
else
printf("Lulus..\n");
uan=((kimi+fisi+bio+bindo+binggo+mtk)/6);
printf("Rata-Rata mu...: %d",uan);
printf("\n\nPencet Enter buat lanjut..\n");

getch();
}
void psb()
{

int psb;
printf("\nIni Program untuk memprediksikan PSB SMA dengan nilai UAN mu..\n");
printf("\nMasukkan nilai rata-rata uan mu:.."); scanf("%d",&psb);
if (psb<=70)
printf("Masuk SMA N 60 Jakarta...\n");
else
if(psb<=75)
printf("Masuk SMA N 6 Jakarta..\n");
else
if(psb<=80)
printf("Masuk SMA N 70..\n");
else
if(psb<=85)
printf("Masuk SMA N 55 Jakarta..\n");
else
if(psb<=90)
printf("Masuk SMA N 28 Jakarta..\n");
else
if(psb>=90)
printf(“Masuk SMA N 8 Jakarta..\n”);
else
printf(“Masuk mana ya…\n”);

printf(“\nPencet Enter buat lanjut..\n”);
getch();

}

sumber  nusinau.com

Pembuatan Password (C++)

#include
#include
#include
main()
{
char nama[20], kelas[10], password[4];
atas:

cout<<" S E L A M A T D A T A N G" ;
cout<
cout<<" Silahkan masukkan User Name & Password" ;
cout<
cout<
cout<<" UserName : " ; cin>>nama;
cout<<" Kelas : " ; cin>>kelas;
cout<<" Password : " ; cin>>password;
if (strcmp(password,"aaa")==0)
{
cout<<" Terima Kasih atas Partisipasinya..!" ;
cout<
cout<<" Tekan Sembarang Mas..!" ;
goto bawah;
}
else
{
cout<<
cout<<" Password Salah Bro..!" ;
clrscr();
goto atas;
}
bawah:
getch();
}

Sumber nusinau.com

Program Jadwal Keberangkatan Kereta Api

#include
int a;
void main(){
Kode_hari:
cout < < "Jadwal Pemberangkatan Kereta Api Dari Stasiun Tugu\n";
cout << "1. Senin \n";
cout << "2. Selasa \n";
cout << "3. Rabu \n";
cout << "4. Kamis \n";
cout << "5. Jumat \n";
cout << "6. Sabtu \n";
cout << "7. Minggu \n \n";

cout << "Masukkan pilihan Anda : ";
cin >> a;
switch(a){
case 1: cout << "[Senin] 1. Fajar UT. [08.00 wib] 2. Argo Bromo [12.00 wib]\a\n\n"; break;
case 2: cout << "[Selasa] 1. Argo Gede [06.00 wib] 2. Jaya Baya [08.00 wib]\a\n\n";break;
case 3: cout << "[Rabu] 1. Argo Lawu [10.00 wib] 2. Argo Muria [13.00 wib] 3. Argo Wilis [15.00 wib]\a\n\n";break;
case 4: cout << "[Kamis] 1. Parahyangan [07.00 wib] 2. Sanlaka [09.00 wib]\a\n\n";break;
case 5: cout << "[jumat] 1. Senjut [08.00 wib] 2. Mahesa [10.00 wib]\a\n\n"; break;
case 6: cout << "[Sabtu] 1. Fajar Ut. [06.00 wib] 2. Argo Lawu [10.00 wib]\a\n\n";break;
case 7: cout << "[Minggu] 1. Jaya Baya [07.00 wib] 2. Argo Gede [10.00 wib]\a\n\n";break;
}
getch();
clrscr();

goto Kode_hari;
}

sumber  nusinau.com

Record 4

Kasus :

Program ini akan merekam informasi mengenai 20 data buku-buku yang ada meliputi judul buku, kode, pengarang, edisi, tahun terbit, dan penerbitnya. Output yang diharapkan adalah berupa tabel yang menampilkan informasi data buku yang telah direkam secara terurut ascending dengan metode sorting berdasarkan judul buku.

Demikianlah kira-kira gambaran tentang program tersebut..

uses wincrt;
type
recBuku=record
judul:string[20];
kode:string[10];
pengarang:string[20];
ed:string[4];
tahun:integer;
penerbit:string[20];
end;
var
a:array[1..20] of recBuku;
tempjudul,temppeng,temppnb:string[20];
tempkod:string[10];
temped:string[4];
tempth,i,j:integer;
begin
writeln(‘+++++++++++++++++ Input Data Buku ++++++++++++++++’);
writeln(‘—————————————————————–’);
for i:=1 to 200 do
begin
write(‘Judul Buku : ‘);readln(a[i].judul);
write(‘Kode Buku : ‘);readln(a[i].kode);
write(‘Pengarang : ‘);readln(a[i].pengarang);
write(‘Edisi : ‘);readln(a[i].ed);
write(‘Tahun terbit : ‘);readln(a[i].tahun);
write(‘Penerbit : ‘);readln(a[i].penerbit);
writeln;
end;
for i:=1 to 200 do
begin
for j:=1 to 200 do
begin
if a[j].judul > a[i].judul then
begin
tempjudul:=a[j].judul;
a[j].judul:=a[i].judul;
a[i].judul:=tempjudul;
tempkod:=a[j].kode;
a[j].kode:=a[i].kode;
a[i].kode:=tempkod;
temppeng:=a[j].pengarang;
a[j].pengarang:=a[i].pengarang;
a[i].pengarang:=temppeng;
temped:=a[j].ed;
a[j].ed:=a[i].ed;
a[i].ed:=temped;
tempth:=a[j].tahun;
a[j].tahun:=a[i].tahun;
a[i].tahun:=tempth;
temppnb:=a[j].penerbit;
a[j].penerbit:=a[i].penerbit;
a[i].penerbit:=temppnb;
end;
end;
end;
clrscr;
writeln;
writeln(‘+++++++++++++++++ Output Data Buku +++++++++++++++++++’);
writeln;
writeln(‘———————————————————————–’);
writeln(‘| No | Judul | Kode | Pengarang | Edisi | Tahun | Penerbit |’);
writeln(‘———————————————————————–’);
writeln;
for i:=1 to 200 do
begin
writeln(i,’ ‘,a[i].judul:3,’ ‘,a[i].kode:3,’ ‘,a[i].pengarang:3,’ ‘,a[i].ed:3,’ ‘,a[i].tahun:3,’ ‘,a[i].penerbit:3);
end;
readln;
end.

Pada program diatas deklarasi untuk proses sorting data ditunjukkan pada :

for i:=1 to 200 do
begin
for j:=1 to 200 do
begin
if a[j].judul > a[i].judul then
begin
tempjudul:=a[j].judul;
a[j].judul:=a[i].judul;
a[i].judul:=tempjudul;
…
a[j].penerbit:=a[i].penerbit;
a[i].penerbit:=temppnb;
end;
end;
end;

sumber nusinau.com

Program Gaji (Pascal)

Program Gaji ;

uses wincrt;
var Nama,Nip : char ;
gaji_pokok,gaji_kotor,tunjangan,pajak,gaji_bersih :real;

begin
writeln (‘ Gaji Pegawai ‘) ;
write ( ‘ Nama : ‘ ) ; readln ( Nama ) ;
write ( ‘ Nip : ‘) ; readln (Nip) ;
write ( ‘ Gaji Pokok : ‘ ) ; readln ( gaji_pokok ) ;
write ( ‘ Tunjangan : ‘ ) ; readln ( tunjangan ) ;

writeln;

pajak := 0.1 * gaji_pokok ;
writeln ( ‘ Pajak : ‘ , pajak : 2 : 0 ) ;
gaji_kotor := gaji_pokok + tunjangan ;
writeln ( ‘ Gaji Kotor : ‘ , gaji_kotor: 2 : 0 ) ;
gaji_bersih := gaji_kotor + pajak ;
writeln ( ‘ Gaji Bersih: ‘ , gaji_bersih : 2 : 0 ) ;
readln ;
end.

sumber nusinau.com

Perhitungan Gaji (Pascal)

Contoh Penghitungan Gaji

Ketentuan Soal :
1. Nama Di input
2. Jabatan di input ,
Jabatan Gaji Tunjangan
Direktur 3000000 10 % dari gaji
Manager 2000000 5% dari gaji
Karyawan 1000000 2% dari gaji
OB 800000 1% dari gaji

3. Dikenakan PPN 10 % dari gaji
4. Gaji Bersih didapat dari : gaji + tunjangan – PPn

Jawabannya:

Uses crt;
Var nama:string[20];jabatan:string;
Gaji:longint;
Tunj,ppn,gajibersih:real;
Begin
Clrscr;
Write(‘Nama Karyawan : ‘); readln(nama);
Write(‘Masukkan Jabatan : ‘); readln(jabatan);
If (jabatan=’Direktur’) or (jabatan=’direktur’) then
Begin
Gaji:=3000000;
Tunj:=0.1* gaji;
End
Else If (jabatan=’Manager’) or (jabatan=’manager’) then
Begin
Gaji:=2000000;
Tunj:=0.05* gaji;
End
Else If (jabatan=’Karyawan’) or (jabatan=’karyawan’) then
Begin
Gaji:=1000000;
Tunj:=0.1* gaji;
End
Else
Begin
Gaji:=800000;
Tunj:=0.1* gaji;
End;
Writeln(‘Gaji Bersih : Rp.‘,gaji);
Writeln(‘Tunjangan Jabatan : Rp.‘,tunj:9:2);
Ppn:=0.1*gaji;
Writeln(‘PPN 10 % : Rp.‘,ppn:9:2);
Total:=(gaji+total)-ppn;
Writeln(‘Total Gaji : Rp.‘,total:9:2);
Readln;
End.

Sumber nusinau.com