Note: 2011

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 :

Buka Delphi
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 :

Penjumlahan (+)
Pengurangan (-)
Perkalian (*)
Pembagian (/)
Modulo (%)

Contoh 3:

//operator aritmatik 1

#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

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

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

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

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

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

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

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

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:

Fungsi sqrt(x) à untuk mencari Öx.
Fungsi pow(x,y) à digunakan untuk mencari x^y

Kedua fungsi tersebut harus menggunakan header file math.h

Contoh 10:

//penggunaan sqrt dan pow

#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......

Kamis, 24 Februari 2011

Penjelasan file header dan fungsi-fungsi pada bahasa C

File – File Header

stdio.h : berisi prototype fungsi untuk fungsi pustaka baku input output,perintah dasar untuk IO
math.h : berisi prototype fungsi untuk pustaka matematika
string.h : berisi prototype fungsi untuk pemrosesan string
iostream.h : diperlukan pada program yang melibatkan objek cout
conio.h : diperlukan bila melibatkan clrscr(),yaitu perintah untuk membersihkan layar.

Fungsi - Fungsi

Do - while : Statemen do-while digunakan untuk mengulang suatu proses selama kondinya dipenuhi.

Bentuk sintaks statemen do-while adalah:
do
Pernyataan
while (kondisi)

For : Statemen for digunakan untuk mengulang eksekusi suatu ungkapan dengan jumlah pengulangan yang sudah tertentu.

Bentuk sintaksisnya adalah sebagai berikut:For (ungkapan1; ungkapan2; ungkapan3)
Pernyataan;

While : Berbeda dengan do-while, pada statemen while pengujian terhadap loop dilakukan di bagian awal (sebelum tubuh loop).

Bentuk sintaksisnya adalah sebagai berikut:While (kondisi)
pernyataan

islower() : Mempunyai bentuk
int islower(int c);
Merupakan makro yang akan menghasilkan nilai benar (bukan nol) jika c adalah sebuah huruf kecil (‘a’ sampai dengan ‘z’).

isupper() : Mempunyai bentuk
int isupper(int c);
Merupakan makro yang akan menghasilkan nilai benar (bukan nol) jika c a adalah sebuah huruf kecil (‘A’ sampai dengan ‘Z’).

tolower() : Mempunyai bentuk
int tolower(int c);
Jika c adalah huruf kapital, maka hasil fungsi berupa huruf kecilnya.
Apabila c tidak berupa huruf kapital, keluaran fungsi sama dengan c.

toupper() : Mempunyai bentuk
int toupper(int c);
Jika c adalah huruf kecil, maka hasil fungsi berupa huruf kapitalnya.
Apabila c tidak berupa huruf kecil, keluaran fungsi sama dengan c.

strcpy() : Mempunyai bentuk
strcpy(tujuan, asal);
Fungsi ini digunakan untuk menyalin variabel string asal ke variabel string tujuan atau berfungsi untuk menyalin isi suatu string ke string lain.
Dalam hal ini, variabel tujuan haruslah mempunyai ukuran yang dapat digunakan untuk menampung seluruh karakter dari string asal.
Contoh:
strcpy(pepatah, “Kalau ada kemauan pasti ada jalan”);
merupakan instruksi untuk menyalin string “Kalau ada kemauan pasti ada jalan” ke variabel string pepatah.

strlen() : Mempunyai bentuk
strlen(var_string);
Digunakan untuk memperoleh jumlah karakter dalam variabel string yang merupakan argumennya atau digunakan untuk mengetahui panjang suatu string
Karakter NULL tidak ikut dihitung.

strcmp() : Mempunyai bentuk
var_int = strcmp(str1, str2);
Fungsi ini digunakan untuk membandingkan variabel string str1 dengan string str2. Atau digunakan untuk membandingkan 2 buah string secara case sensitive.

sqrt() : Digunakan untuk menghitung akar dari sebuah bilangan.
Bentuk umum : sqrt(bilangan);

pow() : Digunakan untuk menghitung pemangkatan suatu bilangan.
Bentuk umum : pow(bilangan, pangkat);

atof() : Digunakan untuk mengkonversi nilai string menjadi bilangan bertipe double.
Bentuk umum : atof(char x);

atoi() : Digunakan untuk mengkonversi nilai string menjadi bilangan bertipe integer.

Baca Selengkapnya......