Pemrograman Sistem


Program Menghitung Faktorial

Listing program :
#include <cstdlib>
#include <iostream>
using namespace std;
long factorial(long a){
     if(a>1)
            return (a * factorial (a-1));
     else
         return (1);}
int main (){
    cout<<"Program Menghitung Faktorial"<<endl;
    cout<<" "<<endl;
    cout<<" "<<endl;
    long number1,number2,hasil;
    int pilih;
    cout << "Masukkan Angka : ";
    cin >> number1;
    cout << "Masukkan Angka : ";
    cin >> number2;
    cout<<" "<<endl;
    cout<<" "<<endl;
    cout<<"Pilih Proses yang Akan Dilakukan"<<endl;
    cout<<" "<<endl;
    cout<<"1. Penjumlahan Faktorial"<<endl;
    cout<<"2. Pengurangan Faktorial"<<endl;
    cout<<" "<<endl;
    cout<<"Masukkan Pilihan : ";cin>>pilih;
    switch (pilih) {
           case 1 :
              hasil = factorial(number1) + factorial(number2);
              cout <<number1<<"! + "<<number2<<"! = "<< hasil <<endl;
              break;
           case 2 :
              hasil = factorial(number1) - factorial(number2);
              cout <<number1<<"!"<<" - "<<number2<<"! = "<< hasil <<endl;
              break;              }
    cout<<" "<<endl;
    system("PAUSE");
    return EXIT_SUCCESS;
}

Program Dari Bilangan ke Terbilang

Listing program :
#include<stdio.h>
#include<conio.h>
void ribuan(int angka);
void ratusan(int angka);
void puluhan(int angka);
void satuan(int angka);
int main() {
 long int angka;
 int tekan; do {    do {
       printf("Program membaca bilangan");
       printf("\nÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ");printf("\n");
       fflush(stdin);
       printf("\nMasukkan angka (0-9999): ");scanf("%ld",&angka);
    }while (angka > 9999 || angka < 0);
    printf("Dibaca: ");
    if (angka>999) ribuan(angka);
    else if (angka>99) ratusan(angka);
    else if (angka>9) puluhan(angka);
    else if (angka>-1) satuan(angka);
    printf("\n\nTekan ESC untuk Keluar dan Spasi untuk kembali...");
    tekan=getch();
 }while(tekan != 27);
}
void ribuan(int angka) {
 int temp1,temp2;
 temp1=angka/1000;temp2=angka%1000;
 if (temp1 <10 && temp1 > 1) { satuan(temp1);printf("ribu "); }
 else printf("seribu ");
 if (temp2 > 99) ratusan(temp2);
 else if (temp2 > 9) puluhan(temp2);
 else if (temp2 > 0) satuan(temp2);}
void ratusan(int angka) {
 int temp1,temp2;
 temp1=angka/100;temp2=angka%100;
 if (temp1 < 10 && temp1 > 1) { satuan(temp1);printf("ratus "); }
 else if (temp1 == 1) printf("seratus ");
 if (temp2 > 9) puluhan(temp2);
 else if(temp2 >0) satuan(temp2);}
void puluhan(int angka) {
 int temp1,temp2;
 temp1=angka/10;temp2=angka%10;
 switch (temp1) {
    case 1: {
       if (temp2 == 0) { printf("sepuluh ");break; }
       else if (temp2 == 1) { printf("sebelas ");break; }
       else if (temp2 == 2) { printf("dua belas ");break; }
       else if (temp2 == 3) { printf("tiga belas ");break; }
       else if (temp2 == 4) { printf("empat belas ");break; }
       else if (temp2 == 5) { printf("lima belas ");break; }
       else if (temp2 == 6) { printf("enam belas ");break; }
       else if (temp2 == 7) { printf("tujuh belas ");break; }
       else if (temp2 == 8) { printf("delapan belas ");break; }
       else if (temp2 == 9) { printf("sembilan belas ");break; }    }
    default:{satuan(temp1);printf("puluh ");} }
 if (temp2 > 0 && angka >19) satuan(temp2);}
void satuan(int angka) {
 switch (angka) {
    case 9:printf("sembilan ");break;
    case 8:printf("delapan ");break;
    case 7:printf("tujuh ");break;
    case 6:printf("enam ");break;
    case 5:printf("lima ");break;
    case 4:printf("empat ");break;
    case 3:printf("tiga ");break;
    case 2:printf("dua ");break;
    case 1:printf("satu ");break;
    case 0:printf("nol ");break; }
}


 

Bahasa Rakitan

Dengan menggunakan bahasa asembler buatlah program input nilai mahasiswa. contoh output:
Masukkan Data Mahasiswa:
NIM : 1213455
Nama : Edomaru
JKl (1=Pria, 2= Wanita) : 1
Jurusan : TI
Nilai Tugas : 80
Nilai UTS : 70
Nilai UAS : 90

Berikut data Nilai Mahasiswa:
NIM = 1213455
Nama = Edomaru
JKL  = Pria
Jurusan = Teknik Informatika
Nilai Akhir = 80
Nilai Huruf = A

keterangan:
nilai akhir > 80 = A
nilai akhir > 70 < 80 = B
nilai akhir > 55 < 70 = C
nilai akhir > 40 < 55 = D
nilai akhir < 40 = E

=======================================================

Jawab :


.model small
.code
    org 100h
   
mulai:    jmp proses
a db 80
b db 70
c db 55
d db 40

    tbl_enter equ 0dh    ; 0dh=Enter=13
    kal0 db 13,10,'Masukkan Data Mahasiswa : $'
    Kal1      db 13,10,'Nim: $'
    Kal2      db 13,10,'Nama: $'   
    Kal3      db 13,10,'JKL (1= Pria; 2 = Wanita) : $'   
    Kal4      db 13,10,'Jurusan: $'
    Kal5      db 13,10,'Nilai Tugas : $'
    Kal6      db 13,10,'Nilai UTS : $'
    Kal7      db 13,10,'Nilai UAS : $'
    Kal8      db 13,10,'============================ $'
    Jwb1      db 13,10,'Nim: $'
    Jwb2      db 13,10,'Nama: $'
    Jwb3      db 13,10,'JKL: $'
    Jwb4      db 13,10,'Jurusan: $'
    Jwb5      db 13,10,'Nilai Akhir: $'
    Jwb6      db 13,10,'Nilai huruf: $'
    Jawab1      db 26,?,26 dup(?)    ;?=menyatakan banyak karakter yang diinputkan
    Jawab2      db 26,?,26 dup(?)
    Jawab3      db 26,?,26 dup(?)
    Jawab4      db 26,?,26 dup(?)
    Jawab5      db 3,?,3 dup(?)
    Jawab6      db 3,?,3 dup(?)
    Jawab7      db 3,?,3 dup(?)
    ket0 db 13,10,'Masukkan Data Mahasiswa : $'
    ket2 db 13,10,'Berikut Data Nilai Mahasiswa : $'
    ket3 db 'Pria $'
    ket4 db 'Wanita  $'
    ket5 db 'Teknik Informatika$'
    ket6 db 'A $'
    ket7 db 'B $'
    ket8 db 'C $'
    ket9 db 'D $'
    ket10 db 'E $'
   
proses:

    mov ah,09h ; mencetak kalimat
    lea dx,kal0
    int 21h
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal1
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab1
    int 21h
   
    mov ah,09h ; mencetak kalimat
    lea dx,Kal2
    int 21h            ; cetak ket
   
    mov ah,0ah
    lea dx,jawab2
    int 21h
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal3
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab3
    int 21h
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal4
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab4
    int 21h            ; catat
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal5
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab5
    int 21h            ; catat
    ;mov a,bx
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal6
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab6
    int 21h   
    ;mov b,bx
   
    mov ah,09h    ; mencetak kalimat
    lea dx,Kal7
    int 21h            ; tanya
   
    mov ah,0ah
    lea dx,jawab7
    int 21h   
    ;mov c,bx
   
    mov ah,09h
    lea dx,Kal8
    int 21h
   
    mov ah,09h ; mencetak kalimat
    lea dx,Ket2
    int 21h
cetak:
    mov ah,09h ; mencetak kalimat
    lea dx,Jwb1
    int 21h
   
    lea bx,jawab1+2        ; menunjuk byte ke-2 dari jawab
ulang:   
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je cetak2
    mov dl,[bx]
    mov ah,02h        ; mencetak karakter
    int 21h       
    inc bx
    jmp ulang               

cetak2:
    mov ah,09h
    lea dx,Jwb2
    int 21h            ; catat
    lea bx,jawab2+2        ; menunjuk byte ke-2 dari jawab
   
ulang2 :
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je cetak3
    mov dl,[bx]
    mov ah,02h        ; mencetak karakter
    int 21h       
    inc bx
    jmp ulang2

cetak3:
    mov ah,09h
    lea dx,Jwb3
    int 21h            ; catat
   
    lea bx,jawab3+2        ; menunjuk byte ke-2dari jawab
    cmp byte ptr [bx],'1'
    je Pa
    cmp byte ptr [bx],'2'
    je Wa
       
ulang3 :
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je cetak4
    mov dl,[bx]
    ;mov ah,02h        ; mencetak karakter
    ;int 21h       
    inc bx
    jmp ulang3
Pa:
mov ah,09h
    lea dx,ket3
    int 21h
    jmp ulang3
Wa:
mov ah,09h
    lea dx,ket4
    int 21h   
    jmp ulang3
   
cetak4:
    mov ah,09h
    lea dx,Jwb4
    int 21h            ; catat
   
    lea bx,jawab4+2        ; menunjuk byte ke-2dari jawab

    cmp byte ptr [bx],"t"
     je nb
    cmp byte ptr [bx],"T"
     je nb
     
ulang4 :
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je cetak5       
    inc bx
    jmp ulang4
nb:
 mov ah,09h
 lea dx,ket5
 int 21h
 jmp ulang4


cetak5:
    mov ah,09h
    lea dx,Jwb5
    int 21h            ; catat
    lea bx,jawab5+2
   
ulang5 :
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je cetak6
    mov dl,[bx]
    mov ah,02h        ; mencetak karakter
    int 21h       
    inc bx
    jmp ulang5
   
cetak6:
    mov ah,09h
    lea dx,Jwb6
    int 21h            ; catat
   
    lea bx,jawab6+2        ; menunjuk byte ke-2dari jawab
    mov al,a
    cmp al,jawab5+2
    ;jb Bb
    je Aa
    ;ja Aa
   
    mov al,b
    cmp al,jawab5+2
    cmp al,b
    ;jb Cc
    je Bb
    ;ja Bb
   
    mov al,c
    cmp al,jawab5+2
    cmp al,c
    ;jb Dv
    je Cc
    ;ja Cc
       
    mov al,d
    cmp al,jawab5+2
    ;jb Ee
    je Dv
    ;ja Dv
       
ulang6 :
    cmp byte ptr [bx],tbl_enter    ; apakah karakter enter
    je keluar
    mov dl,[bx]
    ;mov ah,02h        ; mencetak karakter
    ;int 21h       
    inc bx
    jmp ulang6

Aa:
mov ah,09h
 lea dx,ket6
 int 21h
 jmp ulang6
Bb:
mov ah,09h
 lea dx,ket7
 int 21h
 jmp ulang6
Cc:
mov ah,09h
 lea dx,ket8
 int 21h
 jmp ulang6
Dv:
mov ah,09h
 lea dx,ket9
 int 21h
 jmp ulang6
Ee:
mov ah,09h
 lea dx,ket10
 int 21h
 jmp ulang6

keluar :   
    int 20h
   
end mulai       
 
 

Pemrograman Sistem


Kumpulan Listing Pemrograman Sistem

/*
Pengurutan data
*/

#include<iostream>
#include<iomanip>
using namespace std;
main()
{
    int byk, htg=1, tmp, data[15];
      cout << "Banyak data : ";
      cin >> byk;
      for(int i=0; i<byk; i++)
      {
      cout << "Masukkan data ke-"<<i<<" : ";
      cin >> data[i];
      }  Read more


 

Pemrograman Sistem


Program untuk menentukan palindrom, bukan palindrom dan membalik kata :

1.      Listing Program

#include<stdio.h>
#include<conio.h>
#include<string.h>

char balik(char x[50]);
char cek(char y[50],char z[50]);

main()
{
char m[50],o[50];
printf("Masukkan kata : ");                        //cetak untuk kalimat masukkan kata
gets(m);
strcpy(o,m);
balik(o);
cek(m,o);
}
 

Teknik Kompilasi


MATERI 1


A. STRUKTUR PROGRAM

deklarasi header file/preprocessor
deklarasi konstanta
deklarasi var global
deklarasi fungsi
deklarasi class

program utama (fungsi utama)

main()  {
    …….
    ……..


Secara umum struktur program dalam C++ adalah sebagai berikut:  Read More

 

Etika Profesi

Pertanyaan 1
1. Sesuatu yang terdapat dalam diri individu yang membimbing dan memberi arah kepada seluruh tingkah laku individu yang bersangkutan (Gordon Allport), adalah pengertian dari .....

Your choice Pilihan yang benar Jawaban Komentar
(X) (X) Kepribadian Jawaban Anda Benar
( ) ( ) Etika
( ) ( ) Profesi
Pilihan berganda (jawaban unik)
Skor : 1/1
Pertanyaan 2
2. Sifat-sifat pribadi yang dimiliki manusia sejak lahir seperti Honesty, Discrecy, Reliability dll adalah termasuk jenis ... Read More .....
 

Pendidikan Agama


Jawab : Jelaskan Istilah-istilah berikut ini !!!
1.     Pengertian Nikah : secara bahasa adalah berkumpul dan bergabung. Adapun secara istilah adalah : “Akad yang dilakukan antara laki-laki dan perempuan yang dengannya dihalalkan baginya untuk melakukan hubungan seksual”.
2.    Pengertian Talaq adalah ucapan perceraian dari sepasang suami istri. Mengikut istilah syara' ia bermaksud, "Melepaskan ikatan pernikahan atau perkahwinan dengan kalimat atau lafaz yang menunjukkan talak atau perceraian".
3.    Pengertian Talak Bain Kubra adalah talak yang telah berlaku kepada pasangan tersebut sebanyak tiga kali. Iaitu suami telah menceraikan isterinya sebanyak tiga kali.
4.     Pengertian Talak Bain Sughra adalah talak yang telah diucapkan oleh suami kurang daripada tiga kali, tetapi pasangan tidak boleh "Rujuk" kembali melainkan dengan pernikahan yang baru, walaupun isterinya di dalam iddah.
5.     Pengertian Rujuk: artinya kembali. Menurut syara’ adalah kembalinya seorang suami kepada mantan istrinya dengan perkawinan dalam masa iddah sesudah ditalak raj’iy.
6.     Pengertian Khuluk adalah talak yang dijatuhkan suami karena menyetujui / memenuhi permintaan isterinya dengan cara seorang istri membayar tebusan.
7.     Pengertian Li’an: menurut bahasa berarti alla’nu bainatsnaini fa sha’idan (saling melaknat yang terjadi di antara dua orang atau lebih). Sedang, menurut istilah syar’i, li’an ialah sumpah dengan redaksi tertentu yang diucapkan suami bahwa isterinya telah berzina atau ia menolak bayi yang lahir dari isterinya sebagai anak kandungnya, dan kemudian sang isteri pun bersumpah bahwa tuduhan suaminya yang dialamatkan kepada dirinya itu bohong.
8.     Pengertian Zihar berasal dari kata zahara-yazhara-zahrah yang berarti punggung, jelas atau terang. Zihar adalah ungkapan suami kepada isterinya yang bermaksud menyamakan anggota tubuh isterinya dengan ibunya, seperti dalam ungkapan; “punggungmu sama dengan punggung ibuku” Read More ....
 

Bahasa Indonesia II


LABORATORIUM

     Laboratorium (disingkat lab) adalah tempat riset ilmiah, eksperimen, pengukuran ataupun pelatihan ilmiah dilakukan. Laboratorium biasanya dibuat untuk memungkinkan dilakukannya kegiatan-kegiatan tersebut secara terkendali. Laboratorium ilmiah biasanya dibedakan menurut disiplin ilmunya, misalnya laboratorium fisika, laboratorium kimia, laboratorium biokimia, laboratorium komputer, dan laboratorium bahasa.
Pada dasarnya, manusia selalu ingin tahu dan ini mendorong manusia untuk bertanya dan mencari jawaban atas pertanyaan itu. Salah satu cara untuk mencari jawaban adalah dengan mengadakan penelitian. 

Apa dan mengapa melakukan penelitian????
Terlebih dahulu saya akan menjelaskan pengertian dari penelitian.Penelitian menurut Fellin (1996) adalah suatu cara sistematik untuk maksud meningkatkan,memodifikasi dan mengembangkan pengetahuan yang dapat disampaikan dan diuji oleh peneliti lain.Kalau menurut saya arti penelitian itu sendiri adalah serangkaian kegiatan untuk menyelesaikan masalah dan mengembangkan pengetahuan.Penelitian ada 2 macam yaitu Ilmiah dan Non ilmiah. Read More .....