Kamis, 28 Maret 2013

Tugas Mata Kuliah Pemrograman Berbasis Obyek (4m41- STMIK WP)

Buatlah makalah tentang
1. identifier
2. keyword
3. literal dan tipe data
4. operator
5. separator
6. variable

ketentuan
font calibri
size judul :14 isi : 12
page setup 4-4-3-3 a4
spasi : 1.5
cover : merah tua/hati
-daftar pusataka-

KELOMPOK 1

Tugas masing2 anggota :

Alkhautsar FH         09.230.0127 <--- mencari tentang indentifier *jangan lupa sumber ditulis*
M. Mansyur            09.240.0200 <-- Mencari tentang keyword *jangan lupa sumber ditulis*
Sutriyo                    11.240.0002 <-- Mencari tentang literal & tipe data *jangan lupa sumber ditulis*
Dessy P. Lestari      11.240.0004 <-- Mencari tentang operator *jangan lupa sumber ditulis*
Agung Susanto        11.240.0008 <-- Mencari tentang separator *jangan lupa sumber ditulis*
Hariyo Prasojo        12.240.0178 <-- Mencari tentang variable *jangan lupa sumber ditulis*

Kirim data yg sudah di cari ke hariyoprasojo@ymail.com <-- online 24 jam, segera di proses makalahnya.
terimakasih.

Deadline hari minggu 31 maret *pas lego* klo sudah kirim sms aja.

Baca Selengkapnya......

Sabtu, 14 Mei 2011

Tugas Mandiri 2 (Pemrograman Dasar)

uses wincrt;

type pegawai =record
nip,nama:string;
gaber,gapok,y:real;
gol:byte;
jam:integer;
end;

larikdata=array[1..50] of pegawai;
var data:larikdata;
i,n:byte;
lagi:char;
x:integer;
label awal;                        
begin
writeln('#######################################################');
writeln('           Program Perhitungan Gaji Pegawai           ');
writeln('---------         {    PT.Jojobi    }         ---------');
writeln;
begin
awal:
lagi:='y';
repeat
inc(n);
writeln('mengisi data Pegawai ke ', n);
write('NIP             : ');readln(data[n].nip);
write('NAMA PEGAWAI    : ');readln(data[n].nama);
write('Golongan        : ');readln(data[n].gol);
write('Jam Kerja /bln  : ');readln(data[n].jam);
writeln;write('mau masukan data lagi (y/t)?');readln(lagi);
until lagi='t';

{gaji}
for i:=1 to n do
case data[i].gol of
1: data[i].gapok:=1000000;
2: data[i].gapok:=1500000;
3: data[i].gapok:=2000000;
else data[i].gapok:=0;
end;
for i:=1 to n do
if data[i].jam>=200 then
data[i].y:=data[i].gapok*0.2
else
data[i].y:=data[i].gapok*0.1;
for i:=1 to n do
data[i].gaber:=data[i].gapok+data[i].y;

begin
{cetak}
clrscr;
writeln('######################################################');
writeln('            Program Perhitungan Gaji Pegawai           ');
writeln('     -----         {    PT.Jojobi    }         -----');
writeln('======================================================');
writeln('                   DAFTAR GAJI PEGAWAI                ');
writeln('=======================================================');
writeln(' no | NIP |   nama pegawai  | gol |  jam kerja | gaji bersih |');
writeln('------------------------------------------------------------');
for i:=1 to n do with data[i] do
writeln(i:3,nip:6,nama:17,gol:6,jam:4,gaber:14:2,'|');
writeln('--------------------------------------------------------');
writeln;
writeln('Masukkan data lagi ? (y/t) ');readln(lagi);
if lagi='y' then goto awal;                                            
end;
end;
end.

Baca Selengkapnya......

Minggu, 17 April 2011

Pemrograman Dasar (Tugas), Program Percabangan

Tugas kali ini membuat program dengan percabangan (Case of dan if)
1. Pengecekan IPK
2. Pencarian letak kuadran (I,II,II,IV)


berikut screenshot nya :


 


Source kode bisa di donlod di : download kode

Baca Selengkapnya......

Rabu, 23 Maret 2011

Perbedaan WiFi dan WiMax

Hari ini Rabu 23/3/2011 saya di berikan tugas oleh Dosen Pengantar Teknologi Informasi,
untuk memposting sebuah tulisan yang berisi "Perbedaan WiFi dan WiMax".

Kebetulan karena saya juga belum tahu apakah itu WiMax, tugas ini memberikan kesempatan untuk belajar mengetahui alat Jaringan tersebut. Sebenarnya penjelasan ini mungkin akan membosankan karena PANJANG. Sehingga saya berusaha menyingkat nya.



inilah sedikit penjelasan Perbedaan WiFi dengan WiMax :



Apa itu WiFi?

Menurut wikipedia.org “Wi-Fi (atau Wi-fi, WiFi, Wifi, wifi) merupakan kependekan dari "Wireless Fidelity", memiliki pengertian yaitu sekumpulan standar yang digunakan untuk Jaringan Lokal Nirkabel (Wireless Local Area Networks - WLAN) yang didasari pada spesifikasi IEEE 802.11.”

Menurut Wi-Fi Alliance “Salah satu cara untuk mengakses internet, istilah Wi Fi diadaptasi dari istilah HiFi, Wi Fi (Wireless Fidelity) merupakan sebutan untuk setiap teknologi wireless yang termasuk dalam spesifikasi IEEE 802.11. Wi-Fi Alliance adalah badan yang bertanggung jawab dengan istilah itu dan hubungannya dengan standar teknologi lainnya.

Dari hasil googling:
Wi-Fi atau Wireless Fidelity memungkinkanpengguna untuk terkoneksi dengan LAN ataupun internet tanpa menggunakan kabel, dengan kata lain nirkabel. Hal ini amat berguna untuk pengguna laptop, PDA, ataupun perangkat nirkabel lainnya.

Untuk menikmati teknologinya pengguna harus berada dekat dengan ‘access point’ yang dipanggil ‘hotspot’ yang meliputi suatu daerah. Radiusnya mencapai jarak antara 91.4 meter hingga 121.9 meter, bergantung kepada halangan seperti dinding bangunan, dan sebagainya. Untuk komunikasi jalur lebar, kecepatan transmisi datanya mencapai 11Mbps, bergantung kepada trafik internet dan jauhnya pengguna dari access point.
Sekarang Kita lihat, Bagaimana WiMax?

Apa itu WiMAX?

Menurut wikipedia.org “WiMAX (Worldwide Interoperability for Microwave Access) adalah sebuah tanda sertifikasi untuk produk-produk yang lulus tes cocok dan sesuai dengan standar IEEE 802.16. WiMAX merupakan teknologi nirkabel yang menyediakan hubungan jalur lebar dalam jarak jauh.

Apa kegunaannya?

WiMAX amat berguna untuk mengakses internet dari mana saja. Pada saat ini ada 3 cara yang popular untuk mengakses internet, yaitu:  
  • Akses Dial-up – Dengan menggunakan modem telepon kita bisa mengakses internet dari rumah kita. Akses ini biasa dipilih jika di daerah kita tidak ada akses broadband atau kita masih merasa mahal untuk berlangganan.
  • Akses Broadband – Dengan membeli modem khusus dan berlangganan aksesnya kita sudah bisa menikmati akses yang jauh lebih cepat dari Dial-up. Kalau di kantorbiasanya memakai jalur T1 atau T3.
  • Akses WiFi – Jika ada WiFi router kita bisa mengakses internet secara wireless asalkan kita berada dekat dengan WiFi Router itu. Di tempat umum biasanya kita akan menemukan router itu di tempat seperti restoran, perpustakaan, ataupun kafe.
 Dengan menggunakan WiMAX kita bisa berinternet ria seperti kita sedang menggunakan ponsel. Di mana saja di setiap sudut kota, kapan saja, asalkan ada sinyal kita bisa berinternet.
 Coba kita lihat lebih dalam, kita telah mengenal WiFi (Protokol 802.11b), tetapi yang namanya manusia pasti ingin sesuatu yang lebih. Akses lebih luas dan kencang, kapan saja dan di mana saja kita bisa mengaksesnaya.
Dan seperti yang kita tahu protocol 802.11n atau WiFi tidak bisa memayungi area yang lebih luas dari 100 meter dan juga bandwidth-nya hanya mencapai 54Mbps.

Bagaimana WiFi bisa berguna untuk semua penduduk kota jika kemampuannya hanya segitu. Maka dari itu WiMAX yang ber-bandwitdh hingga 260 Mbps (teorinya) dengan jangkauan puluhan kilometer sangat mampu melayani masyarakat perkotaan.
Prospek Jika Kedua alat itu di gunakan bersamaan :
  • WiMAX dan WiFI memiliki karakteristik yang berbeda sehingga dalam prakteknya diperlukan design yang tepat diantara keduanya
  • WiMAX dan WiFi dapat digunakan secara bersama (convergence) sehingga satu dengan lainnya dapat saling melengkapi
  • Implementasi WiMAX merupakan alternatif teknologi yang sangat prospektif untuk menggelar Broadband Wireless Access
Terimakasih.

Sumber: http://hajarbleh.multiply.com/journal/item/1/WiFi_VS_WiMAX

    Baca Selengkapnya......

    Kamis, 17 Maret 2011

    Pemrograman Pascal Melalui Delphi

    Aplikasi console (Turbo pascal,etc) merupakan aplikasi berbasis teks dan biasanya berjalan pada command prompt/Under Dos. Delphi menyediakan aplikasi console, tools yang disediakan seperti pascal yang bekerja dengan bahasa pemrograman Pascal

    berikut cara nya:



    {dibawah ini coding yang akan muncul pada unit delphi}

    program Project; // nama program wajib ada

    {$APPTYPE CONSOLE}

    uses
    SysUtils;

    {tempat untuk mendeklarasikan konstanta dan variable yang akan digunakan}

    begin
    { TODO -oUser -cConsole Main : Insert code here }

    {tempat untuk menulis code}
    end.

    =========================================================
    cara menampilkan console nya :

    1. Buka Delphi 
    2. Pilih File | New | Other | Console Application
         3. kemudian muncul unit1 seperti biasanya pada delphi. (Run - seperti biasa)

         4. Selamat mencoba. // ingat menggunakan Bahasa Pemrograman Pascal.. ^_^

    Baca Selengkapnya......

    Senin, 07 Maret 2011

    Install Delphi 7 ke Windows 7 ultimate/Home Basic/etc.

    Bingung Delphi 7 ga jalan di windows 7 ??
    Langsung aje!!
    Cekidot!!


    Saat muncul tampilan seperti ini klik "Run Program"


    Kemudian Jalankan instalasi seperti biasa sampai "finish", default lokasi install jangan di ubah.
    kemudian restart komputer/laptop anda.

    Setelah install selesai dan Restart.

    langkah selanjut nya klik kanan pada directory C:\Program Files\Borland

    klik Properties , kemudian masuk ke box Security.

    Klik Edit , sampai muncul box :
    Kemudian pada Group or user names pilih Users dengan
    users anda sendiri kemudian centang semua pada check list Allow, kemudian click Apply dan tunggu hingga proses selesai dan click OK.

    Semoga bermanfaat.. Terimakasih ^_^

    Baca Selengkapnya......

    Jumat, 25 Februari 2011

    Operator Aritmatik

    Operator aritmatik terdiri :
    1. Penjumlahan (+)
    2. Pengurangan (-)
    3. Perkalian (*)
    4. Pembagian (/)
    5. Modulo (%)


    Contoh 3:
    //operator aritmatik 1
    #include
    #include
    #define phi 3.14
    #define r1 10
    #define teks "Program mencari luas lingkaran\n\n"

    main() {
      cout<
      float r, luas;
      cout<<"Luas lingkaran pertama = "<
      cout<<"\nNilai jari-jari = ";cin>>r;
      luas=phi*r*r;
      cout<<"\nLuas lingkaran kedua = "<
      getch();
    }

    Contoh 3:
    //operator aritmatik 2
    #include
    #include

    main() {
      int a,b,hasil,sisa;
      cout<<"Contoh penggunaan / dan %\n\n";
      cout<<"Masukkan angka pertama (a) = ";cin>>a;
      cout<<"Masukkan angka kedua   (b) = ";cin>>b;
      hasil=a/b;
      sisa=a%b;
      cout<<"\nHasil pembagian bulat = "<
      cout<<"\nSisa hasil bagi       = "<
      getch();
    }

    Tipe Casting
    Dari contoh 3 dapat diketahui bahwa:
    Jika kita mempunyai dua variabel integer (a dan b), dan kita ingin membagi keduanya (a/b), hasilnya diimpan ke variabel hasil yang tipenya int , maka hasil yang tersimpan hanya nilai integernya saja.
    Bagaimana jika kita ingin agar dua bilangan bulat yang dibagi tersebut hasilnya dapat memuat angka desimal?
    Caranya :
    Tipe variabel yang menampung hasil harus float dan ubah salah satu data yang diproses menjadi float sementara (type casting)

    Contoh 4:
    //operator aritmatik 3
    //pembagian dengan hasil bertipe float, hasil yang tersimpan adalah integernya
    #include
    #include

    main() {
      int a,b;
      float c;
      cout<<"Contoh penggunaan / dan %\n\n";
      cout<<"Masukkan angka pertama (a) = ";cin>>a;
      cout<<"Masukkan angka kedua   (b) = ";cin>>b;
      c=a/b;
      cout<<"\nHasil pembagian          = "<
      getch();
    }

    Contoh 5:
    //operator aritmatik 4
    //contoh penggunaan type casting
    #include
    #include

    main() {
      int a,b;
      float c;
      cout<<"Contoh penggunaan / dan %\n\n";
      cout<<"Masukkan angka pertama (a) = ";cin>>a;
      cout<<"Masukkan angka kedua   (b) = ";cin>>b;
      c=float(a)/b;
      cout<<"\nHasil pembagian          = "<
      getch();
    }

    Mengatur angka desimal dan non desimal

    Caranya:
    1.      menggunakan instruksi setprecision(n)
    2.      menggunakan instruksi setiosflag(ios::fixed)
    Kedua instruksi diatas memerlukan header file iomanip.h

    Contoh 6:
    //penggunaan setprecision
    #include
    #include
    #include

    main() {
      int a,b;
      float c;
      cout<<"Contoh penggunaan / dan %\n\n";
      cout<<"Masukkan angka pertama (a) = ";cin>>a;
      cout<<"Masukkan angka kedua   (b) = ";cin>>b;
      c=float(a)/b;
      cout<<"\nHasil pembagian = "<<
      getch();
    }

    Keterangan :
    setprecision (3) à tempat yang dipesan baik untuk nilai bulat maupun desimal adalah 3.

    Contoh 7:
    //penggunaan setprecision dan setiosflags
    #include
    #include
    #include

    main() {
      int a,b;
      float c;
      cout<<"Contoh penggunaan / dan %\n\n";
      cout<<"Masukkan angka pertama (a) = ";cin>>a;
      cout<<"Masukkan angka kedua   (b) = ";cin>>b;
      c=float(a)/b;
      cout<<"\nHasil pembagian          = "
     <<<
      getch();
    }

    Keterangan :
    setiosflags(ios::fixed)<à tempat yang dipesan untuk angka desimal saja.

    Contoh 8:
    //penggunaan setprecision untuk data yang nilainya besar
    #include
    #include
    #include
    #include

    main() {
      char nama[10];
      double gpokok,pot,tunj,gbersih;
      cout<<"Nama karyawan : ";cin>>nama;
      cout<<"Gaji pokok    : ";cin>>gpokok;
      cout<<"Tunjangan     : ";cin>>tunj;
      cout<<"Potongan      : ";cin>>pot;
      gbersih=gpokok+tunj-pot;
      cout<<"\n\nGaji bersih   : "<<
      getch();
    }

    Keterangan:
    Instruksi setprecision(10) bisa dihilangkan seandainya gaji bersih kurang dari 1 juta, tetapi jika lebih dari 1 juta maka akan ditampilkan dalam bentuk eksponensial sehingga perlu ketelitian dalam membaca hasilnya.

    Operator gabungan
    Antara lain : +=, -=, *=, /=, %=

    Operator
    Contoh
    Ekivalen
    +=
    bonus += 500;
    bonus = bonus + 500;
    -=
    budget -= 50;
    budget = budget - 50;
    *=
    gaji *= 1.2;
    gaji=gaji * 1.2;
    /=
    faktor/= 50;
    faktor= faktor/.50;
    %= 
     jml_hari %=7;
    jml_hari =jml_hari % 7;
    Contoh 8:
    // operator gabungan
    #include
    #include
    main()
    {
       int i  = 4;
       int j  = 8;
       int k = 12;
       int jwb;
       jwb = i + j;
       cout << jwb << "\n";
       jwb += k;
       cout << jwb << "\n";
       jwb /= 3;
       cout << jwb << "\n";
       jwb -= 5;
       cout << jwb << "\n";
       jwb *= 2;
       cout << jwb << "\n";
       jwb %= 4;
       cout << jwb << "\n";
       jwb *= 5+3;
       cout << jwb << "\n";
       jwb += 4-2;
       cout << jwb << "\n";
       getch();
    }

    Increase dan Decrease
    Operator
    Contoh
    Deskripsi
    Pernyataan yang ekivalen
    ++
    J++;       
    posfix
    j = j + 1;                       j += 1;
    ++
    ++j;
    prefix
    j = j + 1;                       j += 1;
    --
    j--;
    postfix
    j = j - 1;                        j  -= 1;
    --
    --j;
    prefix
    j = j - 1;                        j -= 1;

    Contoh 9 :
    // increase dan decrease
    #include
    #include
    main()
    {
       int i1=4,i2=4;
       int j1=8,j2=8;
       int a,b,c,d;
       a=++i1;
       b=i2++;
       c=--j1;
       d=j2--;
       cout<<"\nNilai a = "<
       cout<<"\nNilai i1 = "<
       cout<<"\n\nNilai b = "<
       cout<<"\nNilai i2 = "<
       cout<<"\n\nNilai c = "<
       cout<<"\nNilai j1 = "<
       cout<<"\n\nNilai d = "<
       cout<<"\nNilai j2 = "<
       getch();
    }
    Fungsi built-in matematik yang sering digunakan

    Fungsi-fungsi tersebut antara lain:
    1. Fungsi sqrt(x) à untuk mencari Öx.
    2. Fungsi pow(x,y) à digunakan untuk mencari xy
    Kedua fungsi tersebut harus menggunakan header file math.h

    Contoh 10:
    //penggunaan sqrt dan pow
    #include
    #include
    #include

    main() {
      float a,b,c,d;
      a=5;
      b=7;
      c=sqrt(a);
      d=pow(a,b);
      cout<<"\nAkar "<<<" = "<
      cout<<"\n"<<<" pangkat "<<<" = "<
      getch();
    }

    Baca Selengkapnya......