Jumat, 27 Juli 2007

Pembangunan Aplikasi Sistem Informasi Mobile Trading

Nama : Willmen TB Panjaitan

NIM : 4473

Prodi : Teknik Informatika

Kuis : Metodologi Penelitian


I. Intisari

Topik : Pembangunan Aplikasi Sistem Informasi Mobile Trading

Banyak orang berfikir bahwa mereka dapat hidup dengan nyaman dan tentram jika mereka memiliki pekerjaan dengan gaji yang tinggi. Ada juga yang berfikir dengan memenangkan undian berhadiah besar maka hidup mereka pun akan terjamin. Namun ada juga sebagian yang berinvestasi untuk menjamin kelangsungan hidup mereka. Banyak hal yang dilakukan dalam berinvestasi antara lain membeli tanah atau rumah yang lebih dikenal dengan investasi proverty, ada yang membuka usaha dalam berbagai bidang yang lebih dikenal dengan wiraswasta namun ada juga yang berinvestasi dalam bentuk saham. Investasi bentuk ini saat ini sangat marak dilakukan oleh banyak orang. Orang bisa saja menjadi kaya raya dan hidup terjamin dengan memiliki saham namun tidak sedikit dari mereka yang harus jatuh miskin dan hidup terkatung-katung karena investasi saham. Memang bidang ini menuntut ketelitian, kesabaran dan keputusan yang bijak dalam menjalankan bisnis dibidang saham ini.

Tidak dapat kita pungkiri lagi, bahwa sekarang kita berada diera teknologi mobile(mobile technologi). Hal itu juga terjadi pada sektor ekonomi. Jika dunia perbankan memiliki mobile banking, kini para pelaku bisnis saham pun dapat menikmati kemudahan produk mobile untuk bisnis mereka. Jika kita mengenal di BEJ(Bursa Efek Jakarta) terdapat remote trading, sedang di BES(Bursa Efek Surabaya) dikenal dengan online trading maka khusus untuk para pelaku bisnis saham khususnya individu dapat juga menikmati informasi mengenai segala sesuatu tentang saham dengan menggunakan sistem informasi mobile trading(SI-MODI)

Dengan mengimplemantasikan aplikasi ini, perusahaan efek tidak perlu lagi mondar-mandir untuk menghubungi tradernya yang bertugas dilantai bursa(trading floor). Pelaku bisnis cukup melakukan order dari kantor perusahaan mereka sendiri karena aplikasi ini dapar dihubungkan(connect) dengan sistem perdagangan BEJ atau istilah yang populernya adalah Jakarta Automated Trading System (JATS). Aplikasi ini memberikan informasi tentang kurs mata uang, posisi saham yang kita miliki berada dalam urutan keberapa, top gainer , top losser, stock buyer dan stock seller. Sistem informasi ini juga dapat diakses dari HP namun informasi yang di terima nasabah melalui ponsel hanya sebatas harga saham yang mencapai top gainer dan top losser, stock buyer dan stock seller. Namun sistem informasi ini sebatas memberikan informasi, untuk melakukan transaksinya harus dilakukan melalui perusahaan yang bersangkutan (berwenang).

Sistem informasi mobile trading(SI-MODI) ini dibangun dengan menggunakan tool C#.net yang mana merupakan bagian dari visual studio.net. Untuk menyimpan data basenya tool yang yang digunakan yaitu SQL server 2000. Untuk akses mobilenya via HP atau webs, sistem informasi ini menyediakan informasi dalam bentuk WML (Wireless Mark-up Language)

Kata kunci : mobile technologi, C#.net, SQL server 2000, WML (Wireless Mark-up Language)

Minggu, 15 Juli 2007

Garuda Menangis

Garuda Menangis

perjuangan tim merah putih melawan tim kuat Arab Saudi dalam lanjutan
patut kompetisi piala asia, 14 juli 2007 diacungi jempol.
Walaupun kalah, merah putih telah memberikan
perlawanan yang cukup mempersulit pasukan Arab Saudi.

kebololan terlebih dahulu tidak membuat mental tim merah putih
jatuh,dengan sebuah persing kagetan elly aeboy menyamakan kedudukan
bahkan beberapa kali tim merah putih hampir menambah keunggulan.

namun tragis.,..pemain merah putih yang tinggal memiliki nyawa sedikit
namun tetap saja tidak ada inisiatif invan kollev untuk melakukan
pergantian....

budi,elly bahkan firman harus kelelahan bahkan tidak bisa berbuat apa-apa
stategi yang dinilai kurang efektif....

saat melakukan pergantian..hal ini malah membuat kemenangan didepan mata
hilang begitu saja. ismed sofyan yang melakukan pelanggaran didaerah
berbahaya yang akhirnya berbuah tendangan bebas memupuskan harapan garuda.
dengan keunggulan jum dan hading...pemain arab saudi merobek gawang tim
idonesia.

namun apapun itu nasi sudah menjadi bubur. kita tetap harus memberikan
acungan jempol untuk tim nasional kita. setidaknya arab saudi tim kuat
dan langganan piala dunia harus berjuang keras hingga menit akhir untuk
memetik kemenangan dari tim kita. dan juga skor yang hanya beda tipis
2-1 merupakan peningkatan bagi tim nasional kita...mengingat seringnya
kita dicukur habis oleh tim-tim kuat.

bravo garuda...kami tetap mendukung mu

Hubungan Kreatifitas, Inovasi dengan Kewirausahaan

Hubungan Kreatifitas, Inovasi dengan Kewirausahaan

mungkin sedikit informasi ini membantu rekan atau teman yang ingin
mengetahui sedikit mengenai bidang kewirausahaan. adapun informasi
ini saya dapatkan saat saya mengambil mata kuliah kewirausahaan
dikampus saya.


Inovasi

Inovasi adalah proses menemukan atau mengimplementasikan sesuatu
yang baru ke dalam situasi yang baru. Konsep kebaruan ini berbeda
bagi kebanyakan orang karena sifat nya relative (apa yang dianggap
baru oleh seseorang atau pada suatu konteks dapat menjadi sesuatu
yang meruapakan lama bagi orang lain dalam konteks lain)

Inovasi adalah memikirkan dan melakukan sesuatu yang baru yang menambah
atau menciptakan nilai-nilai manfaat(social/ekonomik) (Gde Raka,2001).
Untuk menghasilkan perilaku inofatif seseorang harus melihat inovasi
secara mendasar sebagai proses yang dapat dikelola (John Adair,1996)


Kreativitas
Kreativitas merupakan memikirkan sesuatu,kemampuan seseorang untuk
melahirkan sesuatu yang baru baik berupa gagasan maupun karya nyata
yang relative berbeda dengan apa yang telah ada sebelumnya.


Kreatif
Menghadirkan sesuatu benda atau hal yang sebelumnya sama sekali belum
ada untuk dipergunakan. Ide yang kratif dikaitkan dengan ide yang baru
paling tidak untuk orang yang bersangkutan Ide kreatif ini dapat melibatkan
sebuah usaha penggabungan du ahal atau lebih ide-ide secara langsung (John Adair,1996)


Krativitas dan inovasi
Inovasi dan kerativitas berbeda wilayah domain yang sama,teapi memiliki
batasan yang tegas. Kreatifitas merupakan langkah pertama menuju inovasi
yang terdiri atas berbagai tahap. Kreatifitas berkaitan dengan produksi
kebaruan dan ide yang bermanfaat sedangkan inovasi berkaitan dengan produksi
atau adopsi ide yang bermanfaat dan implementasinya


Wirausaha
Wirausaha adalah kemampuan yang dimiliki oleh seseorang untuk melihat
dan menilai kesempatan-kesempatan bisnis, mengumpulkan sumber daya-sumber
daya yang dibutuhkan untuk mengambil tindakan yang tepat
dan mengambil keuntungan dalam rangka meraih sukses.


Kewirausahaan
Kewirausahaan pada hakekatnya adalah sifat, ciri dan watak seseorang
yang memiliki kemauan dalam mewujudkan gagasan inovatif ke dalam
dunia nyata secara kreatif.

Untuk memenangkan persaingan, maka seorang wirausahawan harus memiliki
daya kreativitas yang tinggi. Daya kreatifitas tersebut sebaiknya adalah
dilAndasi oleh cara berpikir yang maju, penuh dengan gagasan-gagasan
baru yang berbeda dengan produk-produk yang telah ada selama ini di pasar.

Gagasan-gagasan yang kreatif umumnya tidak dapat dibatasi oleh ruang,
bentuk ataupun waktu. Justru seringkali ide-ide jenius yang memberikan
terobosan-terobosan baru dalam dunia usaha awalnya adalah dilAndasi
oleh gagasan-gagasan kreatif yang kelihatannya mustahil.

Namun,gagasan-gagasan yang baikpun, jika tidak diimplementasikan dalam
kehidupan sehari-hari, hanya akan menjadi sebuah mimpi.
Gagasan-gagasan yang jenius umumnya membutuhkan daya inovasi yang tinggi
dari wirausahawan yang bersangkutan. Kreativitas yang tinggi tetap
membutuhkan sentuhan inovasi agar laku di pasar.

Inovasi yang dibutuhkan adalah kemampuan wirausahawan dalam menambahkan
nilai guna/nilai manfaat terhadap suatu produk dan menjaga mutu produk
dengan memperhatikan “market oriented” atau apa yang sedang laku dipasaran.
Dengan bertambahnya nilai guna atau manfaat pada sebuah produk,
maka meningkat pula daya jual produk tersebut di mata konsumen,
karena adanya peningkatan nilai ekonomis bagi produk tersebut bagi konsumen.

untuk menjadi wirausaha yang berhasil, persyaratan utama yang harus dimiliki
adalah memiliki jiwa dan watak kewirausahaan. Jiwa dan watak kewirausahaan tersebut
dipengaruhi oleh keterampilan, kemampuan, atau kompetensi.
Kompetensi itu sendiri ditentukan oleh pengetahuan dan pengalaman usaha.

seseorang wirausaha adalah seseorang yang memiliki jiwa dan kemampuan tertentu
dalam berkreasi dan berinovasi. Ia adalah seseorang yang memiliki kemampuan untuk
menciptakan sesuatu yang baru dan berbeda (ability to create the new and different)
atau kemampuan kreatif dan inovatif. Kemampuan kreatif dan inovatif tersebut secara
riil tercermin dalam kemampuan dan kemauan untuk memulai usaha (start up),
kemampuan untuk mengerjakan sesuatu yang baru (creative), kemauan dan kemampuan untuk
mencari peluang (opportunity), kemampuan dan keberanian untuk menanggung
risiko (risk bearing) dan kemampuan untuk mengembangkan ide dan meramu sumber daya.
Kemauan dan kemampuan-kemampuan tersebut diperlukan terutama untuk:
a.Melakukan proses/ teknik baru (the new technik)
b.Menghasilkan produk atau jasa baru (the new product or new service),
c.Menghasilkan nilai tambah baru (the new value added),
d.Merintis usaha baru (new businesess), yang mengacu pada pasar
e.Mengembangkan organisasi baru (the new organisaton).

Sabtu, 14 Juli 2007

Technopreneur dan Social Entrepreneur

Technopreneur dan Social Entrepreneur


mungkin sedikit informasi ini membantu rekan atau teman yang ingin
mengetahui sedikit mengenai bidang kewirausahaan. adapun informasi
ini saya dapatkan saat saya mengambil mata kuliah kewirausahaan
dikampus saya.


Technopreneur
Senator Nurbahagia, staf pengajar Fakultas Teknik Industri dan Pascasarjana
Institut Teknologi Bandung (ITB), mengungkapkan, technopreneur adalah salah satu
bentuk usaha dengan karakteristik yang berbeda dengan kewirausahaan biasa.
Technopreneur menggabungkan antara teknologi dan pasar yang akhirnya bermuara pada bisnis.
technopreneur merupakan orang yang memulai bisnis berbasis pada inovasi teknologi.
Orang macam ini, kata Senator, harus memiliki sejumlah sikap pendukung di antaranya
memiliki keinginan kuat untuk mengejar prestasi, memiliki kemampuan konseptual,
dan kekuatan memecahkan masalah yang tinggi. Selain itu, mereka juga harus memiliki
wawasan dan cara pikir yang luas, percaya diri tinggi dan toleran, berani mengambil risiko,
realistis, punya kemampuan interpersonal, dan mampu menahan emosi.
Menurut : Senator Nurbahagia, staf pengajar Fakultas Teknik Industri dan Pascasarjana Institut Teknologi Bandung (ITB).
Sumber : republika.co.id

Seseorang yang mempunyai kreativitas suatu bisnis baru dalam menghadapi resiko dan
ketidakpastian yang bertujuan untuk pencapaian laba dan pertumbuhan usaha berdasarkan
identifikasi peluang dan mendayagunakan sumber-sumber serta memodali peluang tersebut
Sumber : powerpoint dari Hj. Ernie Tisnawati Sule, SE, MSi Asep Mulyana, SE, Dipl. Koop.oek

Pengusaha bidang teknologi (Technopreneur), khususnya informasi (TI)
Sumber : detik.com

technopreneur sebagai pengusaha yang membangun bisnisnya berdasarkan kemampuan
di bidang ilmu pengetahuan dan teknologi.
Menurut : Amir Sambodo
Sumber : http://www.republika.co.id/koran_detail.asp?id=141443&kat_id=105&kat_id1=149&kat_id2=



Social Entrepreneur.
Social entrepreneur adalah individu yang melakukan pendekatan masalah social
dengan semangat wirausaha dan intuisi bisnis. Kalau wirausaha menciptakan bisnis
maka social entrepreneurs menciptakan perubahan.

Kalau yang tujuh tipe diatas (ENTREPRENEUR (WIRAUSAHAWAN) :
- ADVISER,
- BUILDER,
- BROKER,
- CARE TAKER,
- CREATOR,
- OWNER,
- SELLER (ACCOUNT,PRODUCT,RETAIL))
terkait dengan bisnis maka tipe yang ini (Social Entrepreneur) tidak terkait dengan bisnis.
Social entrepreneur biasanya energik, persisten, dan umumnya percaya diri dengan kemampuan
untuk memberikan inspirasi kepada yang lainnya untuk bergabung.
Umumnya mereka merasa bertanggung jawab atas suatu misi tertentu.
Social entrepreneur umumnya pragmatik, bisa menjelaskan rencananya dengan rinci
dan sangat independen walaupun bukan orang yang penyendiri.
Sumber : http://www.stmik-mdp.net/tes_bakat.pdf.

Jumat, 13 Juli 2007

Dasar Bahasa Pascal - Lesson 9

pemograman

dasar pascal - lesson 9


PERINTAH INPUT - OUTPUT
3. Perintah Output (write atau writeln )
Perintah digunakan untuk menyajikan data ke default output - key-board.
SYNTAX Write(x); atau writeln(x);
Contoh:
write('TES');
Perintah ini akan menampilkan teks string TES ke layar monitor pada posisi kursor
sebelum perintah write dilaksanakan. Setelah menyajikan ke layar,
kursor pindah ke ujung teks TES pada baris yang sama.
writeln('TES');
Perintah ini akan menampilkan teks TES ke layar monitor pada posisi kursor
sebelum perintah write dilaksanakan. Setelah menyajikan ke layar,
kursor pindah ke awal baris berikutnya.

program luas_PersegiPanjan_01;
{Program untuk menghitung luas bangun empat persegi panjang.
input dibaca dari keyboard dan output ditampilkan ke layar monitor }
uses wincrt;
var panjangPSP, lebarPSP, luasPSP : integer;
{ Mendeklarasikan variable panjang, lebar dan luas persegi panjang sebagai integer. }
BEGIN { Program MULAI }
{ Membaca dari data panjang dan lebar persegi panjang;
default input unit dan default format dengan memberikan pentunjuk ke pemakai tanpa ganti baris.
Setelah membaca data kursor pindah ke baris baru. }
write('Panjang = '); readln(panjangPSP);
write('Leabar = '); readln(lebarPSP); { Menghitung luas persegi panjang. }
luasPSP := panjangPSP * lebarPSP;
{ Menyajikan hasil hitungan luas persegi panjang ke unit default output dan default format.
Setelah menyajikan kursor pindah ke baris baru. }
writeln('Luas = ', luasPSP);
END. { Program SELESAI }

Catatan: Argumen perintah writeln boleh berupa ekspresi.
Contoh perintah penyajian writeln('Luas = ', luasPSP); bisa dikerjakan dengan perintah:
writeln('Luas = ', panjangPSP * lebarPSP);

Dasar Bahasa Pascal - Lesson 8

pemograman

dasar pascal - lesson 8


PERINTAH INPUT - OUTPUT
1. Assignment
Komputer bisa mengolah dan menampilkan sesuatu yang ada di dalam memori.
Merupakan cara tersederhana untuk "menempatkan" (assign) data ke memori.

Contoh:
program luas_PersegiPanjan_00; {Program untuk menghitung luas bangun empat persegi panjang} uses wincrt;
var panjangPSP, lebarPSP, luasPSP : integer;
{Mendeklarasikan variable panjang, lebar dan luas persegi panjang sebagai integer}
BEGIN {Program MULAI}
panjangPSP := 25;
lebarPSP := 20;
luasPSP := panjangPSP * lebarPSP;
END. {Program SELESAI}


2. Perintah Input (read atau readln)
Perintah digunakan untuk membaca data dari default input - keyboard.
SYNTAX read(x); atau readln(x);

Contoh:
program luas_PersegiPanjang_00;
{ Program untuk menghitung luas bangun empat persegi panjang. }
uses wincrt;
var panjangPSP, lebarPSP, luasPSP :integer;
{ Mendeklarasikan variable panjang, lebar dan luas persegi panjang sebagai integer. }
BEGIN { Program MULAI }
{ Membaca dari data panjang dan lebar persegi panjang,
default input unit dan default format tanpa ganti baris}
read(panjangPSP);
readln(lebarPSP);(pengisian variabel pertama dan kedua dipisahkan dengan spasi)
luasPSP:=panjangPSP*lebarPSP;{Menghitung luas persegi panjang}
END. { Program SELESAI }


Perintah read atau readln dapat digunakan untuk membaca data
lebih dari satu sekaligus dengan berbagai format.

Contoh:
program bacaCampuran; { Membaca data sekaligus menggunakan perintah read }
uses wincrt;
var nimMHS : character;
umurMHS : integer;
statusMHS: boolean;
BEGIN
readln(nimMHS,umurMHS,statusMHS);
{setelah mengisi semua variabel , harus diikuti dengan Enter}
END.

Dasar Bahasa Pascal - Lesson 7

pemograman

dasar pascal - lesson 7


4. Operator
Beberapa operator yang disediakan oleh PASCAL:
1. Aritmatika
2. Boolean
3. Relasional
4. Set


Tabel 2. Operator Aritmatika PASCAL
Operator Operasi Tipe Operand Tipe Hasil Operasi
+ Penjumlahan Integer, real Integer, real
- Pengurangan Integer, real Integer, real
* Perkalian Integer, real Integer, real
/ Pembagian Integer, real Integer, real
div Pembagian integer, integer integer
mod Sisa pembagian integer, integer integer

Contoh :
9 + 2 (hasil: 11)
9 - 2 (hasil: 7)
9 * 2 (hasil: 18) 9 / 2 (hasil: 4.5)
9 div 2 (hasil: 4)
9 mod 2 (hasil: 1)


Tabel 3. Operator Boolean PASCAL
Operator Operasi Tipe Operand Tipe Hasil Operasi
not negasi boolean boolean
and logika ‘and’ boolean boolean
or logika ‘or’ boolean boolean
xor logika ‘xor’ boolean boolean
Contoh:
A dan B suatu variabel boolean
A not (A)
TRUE FALSE
FALSE TRUE

A B A and B A or B A xor B
TRUE TRUE TRUE TRUE FALSE
TRUE FALSE FALSE TRUE TRUE
FALSE TRUE FALSE TRUE TRUE
FALSE FALSE FALSE FALSE FALSE


Tabel 3. Operator Relasional
Operator Operasi Tipe Operand Tipe Hasil Operasi
= Sama dengan sederhana,string,pointer,set boolean
<> Tidak sama dengan sederhana,string,pointer,set boolean
< Lebih kecil dari sederhana,string boolean
> Lebih besar dari sederhana,string boolean
<= Lebih kecil atau = sederhana,string boolean
>= Lebih besar atau = sederhana,string boolean

Contoh:
Misal suatu variable A:=9 dan B:=2,
maka:
A = B (hasil: FALSE);
A <= B (hasil: FALSE) A <> B (hasil: TRUE);
A >= B (hasil: TRUE)
A < B (hasil: FALSE)
A > B (hasil: TRUE)


4. Operasi pada Set
a. Operasi Relasional pada Set
Ada empat perbandingan relasional yang diperkenankan pada set.
Tabel 4. Operator Relasional pada set

Operator Operasi Tipe Operand Tipe Hasil Operasi
= Sama dengan Set,set boolean
<> Tidak sama dengan Set,set boolean
<= Lebih kecil atau = Set, set boolean
>= Lebih besar atau = Set, set boolean

Misal
A dan B adalah merupakan dua buah set.
A = B : mempunyai hasil True jika A dan B memiliki anggota-anggota yang sama.
Contoh: [Sun, Tue, Fri] = [Tue, Fri, Sun].
A <> B: mempunyai hasil True jika A dan B memiliki anggota-anggota yang tidak sama.
A <= B : menunjukkan bahwa A adalah subset dari B.
Contoh: Jika A berisi [Sun, Mon, Tue] dan B berisi [Sun, Mon, Tue, Wed, Thu],
maka A adalah merupakan subset dari B dan ekspresi menghasilkan nilai True.
A >= B : menunjukkan bahwa A adalah superset dari B.
Contoh: Jika A berisi [Sun..Sat] dan B berisi [Mon..Fri],
maka A adalah merupakan superset dari B dan ekspresi menghasilkan nilai True.

b. Operasi Logika pada Set
Ada tiga operasi logika pada set.
Tabel 5. Operator Logika pada set
Operator Operasi Tipe Operand Tipe Hasil Operasi
+ Union Set Set
- Difference Set Set
* Intersection Set Set
Misal:
+ atau Union: [Sun, Mon, Tue, Wed] + [Mon, Thu, Fri]
menghasilkan [Sun, Mon, Tue, Wed, Thu, Fri].
- atau Difference: [Sun, Mon, Tue, Wed] - [Mon, Tue, Fri]
menghasilkan [Sun, Tue, Wed], yang merupakan anggota dari
set pertama yang bukan anggota set yang kedua.
* atau Intersection: [Sun, Mon, Tue, Wed] * [Mon, Tue, Fri] menghasilkan
[Mon,Tue], yang merupakan anggota kedua set.


5. Ekspresi
Merupakan kombinasi antara operator dan operand. Ekspresi matematik yang terjadi
dalam dunia nyata diterjemahkan kedalam bahasa Pascal dengan sedikit perubahan tanda.
Contoh:
Ekspresi matematika Ekspresi PASCAL
• a + b • a + b
• x ( y + z ) • x * ( y + z )
• b2 - 4ac • b * b - 4*a*c
Contoh: Bila dideklarasikan var i, j: integer; maka, i + j adalah ekspresi aritmatik
(menghasilkan suatu bilangan integer) i < j adalah ekspresi boolean
(menghasilkan logika TRUE atau FALSE)


6. Fungsi Matematik Standar dalam PASCAL
Tabel 6. Beberapa fungsi matematik standar yang disediakan oleh PASCAL
Nama Fungsi Deskripsi Tipe Argumen Tipe Hasil Operasi
abs absolute value real/integer real/integer
arctan arctan (radian) Real/integer real
cos cosine (radian) real/integer real
sin sin (radian) real/integer real
exp fungsi Perpangkatan e real/integer real
ln ln real/integer real
round Pembulatan terdekat real integer
sqr kuadrat real/integer real/integer
sqrt Akar kuadrat real/integer real
trunc Pembulatan ke bawah real/integer integer

Contoh :
Abs(-11) (hasil: 11)
Round(10.6) (hasil: 11)
Trunc(10.6) (hasil: 10)
Sqrt(4) (hasil: 2)
Sqr(4) (hasil: 16)
Untuk fungsi trigonometri:
x = sin phi menjadi x:=sin (3.1416);

Dasar Bahasa Pascal - lesson 6

pemograman

dasar pascal - lesson 6


Tipe Data Terstruktur
tipe ini terdiri atas : array, record, set, dan file.
String adalah tipe data jenis array, tetapi karena string memiliki kekhasan tersendiri sebagai
array dari karakter maka penulis perlu memberikan penjelasan tersendiri. Sedangkan untuk array, record,
dan file perlu dijelaskan dalam bab yang lain karena agak banyak hal-hal yang perlu dibahas.


-Tipe Data Pointer
pointer merupakan variabel khusus yang berisi suatu address (alamat) di lokasi lain didalam memory.
Suatu variabel yang points(menunjuk) ke sesuatu sehingga disebut pointer.
Ada dua macam pointer:
-typed(tertentu):
merupakan pointer yang menunjuk pada tipe data tertentu pada variable.
-generic(umum):
merupakan pointer yang tidak menunjuk pada tipe data tertentu pada variable.
Contoh deklarasi pointer:
var p : ^integer;
Contoh di atas merupakan deklarasi variabel p sebagai pointer dari integer.
Dengan menambahkan tanda caret (^) di depan nama tipe data variabel yang dideklarasikan:
contoh :
program contoh_pointer1;
uses wincrt;
var p : ^integer;
m, n : integer;
begin
m:=10;
n:=15;
p:=@m; { p sekarang menunjuk ke m }
p^:=12; { hal ini sama dengan m:=12; }
p:=@n; { p sekarang menunjuk ke n }
p^=m; { { hal ini sama dengan n:=m; }
writeln('m = ',m,', n = ',n); { m = 12, n = 12 }
end.
Ketika p menunjuk ke m ( p:=@m;), mengakses p^ sama dengan mengakses m.
Dalam membuat program, dalam penggunaan pointer kita memerlukan alokasi memori tertentu:
Ketika kita mendeklarasikan variabel pointer dalam "var" sehingga merupakan suatu static variable,
yang mana Static variable ini dibatasi oleh kapasitas 64KB untuk tiap module.
Yang berarti dalam program utama kita hanya bisa menggunakan hanya 64KB dan tiap unit Pascal
hanya bisa memakai 64KB. Sehingga kita perlu memecahkan program kebeberapa unit.
Salah satu teknik yang dipakai untuk mengatasi persoalan ini adalah seperti program berikut.

Program contoh_pointer2;
uses wincrt;
Type Pemployee = ^Temployee;
Temployee = record Name : string[10];
Position : char;
Salary : longint;
end;
var p : pemployee;
begin
new(p);
p^.name:='Saddam';
p^.position:='S';
p^.salary:=3000;
writeln(p^.name,' ',p^.position,' ',p^.salary);
dispose(p);
end.
Pada blok begin...end blok, kita bisa melihat meskipun p tidak menunjuk pada suatu variable
tetapi dapat diisi dengan nilai. Pernyataan new(p); tidak memerlukan alokasi memori.
Setelah itu kita bisa melakukan apapun pada variabel tersebut sampai kita membuangnya dari memori dengan
memakai perintah dispose(p);. Variable dengan cara ini dinamakan dengan dynamic variable.

Generic Pointer
adalah pointer tanpa tipe data tertentu.
Biasanya, pointer berkaitan dengan tipe data khusus, sedangkan generic pointer tidak.
Deklarasi:
Var P : pointer;
Dipergunakan sebagai buffer sementara (tidak permanen). Sehingga kita bisa melepasnya untuk suatu saat
tidak diperlukan. Untuk itu pointer sangat bagus karena sifatnya yang dinamis.
Tetapi, generic pointer tidak sama dengan typed pointer. Typed pointer menggunakan "new" untuk menampung memori
dan "dispose" untuk melepasnya. Generic pointer menggunakan "getmem" untuk mendapatkan memori dan "freemem"
untuk melepasnya. Pada pointer dengan tipe tertentu, program Pascal mengetahui ukuran dari memori yang harus
dilaokasikan, sedangkan tipe umum (generic pointer) Pascal tidak bisa, karena Pascal tidak mengetahui variabel
apa yang akan dipakai. Sehingga dengan getmem kita perlu untuk menentukan berapa besar memori yang akan kita
alokasikan. Ukuran terbesar adalah 65532 bytes (hampir 64K).

Program contoh_pointer2;
uses wincrt;
Var P : pointer;
Begin
Getmem(p,8192); { Reserve 8192 bytes }{ We use it then }
freemem(p,8192); { Release it, 8192 bytes }
end.

Dasar Bahasa Pascal - Lesson 5

pemograman

dasar pascal - lesson 5


Tipe Data Terstruktur
tipe ini terdiri atas : array, record, set, dan file.
String adalah tipe data jenis array, tetapi karena string memiliki kekhasan tersendiri sebagai
array dari karakter maka penulis perlu memberikan penjelasan tersendiri. Sedangkan untuk array, record,
dan file perlu dijelaskan dalam bab yang lain karena agak banyak hal-hal yang perlu dibahas.


b. Tipe Data Set
Sebuah set merupakan suatu himpunan yang berisi nilai (anggota). set merupakan Tipe data yang khusus untuk Pascal.
Set dalam pemrograman sangat mirip dengan himpunan dalam ilmu matematika,
contoh: A = { 1, 2, 3, 4, 5 }
Syntax: set of contoh:
type Digits = set of 0..9;
Letters = set of 'A'..'Z';
type Day = (Sun, Mon, Tue, Wed, Thu, Fri, Sat);
CharSet = set of Char;
Digits = set of 0..9;
Days = set of Day;
const EvenDigits: Digits = [0, 2, 4, 6, 8];
Vowels: Letters = ['A', 'E', 'I', 'O', 'U', 'Y'];
Kita tidak bisa menulis atau membaca isi dari set, tetapi kita bisa melakukan operasi yang lain dengan data
yang ada pada set (mis. relasional).
Contoh:
Program contoh_set;
Uses wincrt;
type hari = (ahad, sen, sel, rab, kam,jum, Sab);
var semua_hari : set of hari;
hari_kerja : set of sen .. jum;
hari_ini : hari;
begin
hari_ini:=sen;
if hari_ini in hari_kerja then
writeln('HARI INI HARI KERJA')
else
writeln('HARI LIBUR');
end.
Salah satu manfaat dari penggunaan tipe data set adalah untuk mengecek apakah suatu nilai muncul dalam
suatu range tertentu. Misalnya, untuk mementukan apakah suatu karakter berupa lower case letter (huruf kecil),
mis. Ch adalah tipe Char, kita bisa menulis,
if (Ch >= 'a') and (Ch <= 'z') then Writeln( Ch,' merupakan huruf kecil.');
atau, dengan notasi set, kita bisa menulis ,
if Ch in ['a'..'z'] then Writeln( Ch,' merupakan huruf kecil.');

Dasar Bahasa Pascal - Lesson 4

pemograman

dasar pascal - lesson 4


Tipe Data Terstruktur
tipe ini terdiri atas : array, record, set, dan file.
String adalah tipe data jenis array, tetapi karena string memiliki kekhasan tersendiri sebagai
array dari karakter maka penulis perlu memberikan penjelasan tersendiri. Sedangkan untuk array, record,
dan file perlu dijelaskan dalam bab yang lain karena agak banyak hal-hal yang perlu dibahas.

a. Tipe Data String String
merupakan suatu data yang menyimpan array (larik), sebagai contoh 'ABCDEF' merupakan sebuah konstanta
string yang berisikan 6 byte karakter. Ukuran Tempat untuk tipe data ini adalah 2 s/d 256 byte,
dengan jumlah elemen 1 s/d 255. String dideklarasikan dengan string [ konstanta ] atau string.
Bila ukuran string tidak didefinisikan maka akan banyak memakan ruang, karena ukuran string menyesuaikan
dengan defaultnya.
Misalkan var kata: string [20]; atau var kata: string;
karena string merupakan array dari karakter. Maka kata[1] merupakan karakter pertama dari string,
kemudian kata[2], merupakan elemen kedua, dst.

Contoh:
Program hal_string;
Uses wincrt;
var s : string;
begin s:='Hello';
writeln(s);
writeln('panjang dari string adalah: ',ord(s[0]));
end.


Karakter nol merupakan karakter yang menyatakan panjang string. Sehingga ord(s[0]) menyatakan panjang
dari string tersebut. Panjang string juga bisa dinyatakan sebagai length(s).
routines pada Pascal untuk manipulasi string :

-Length : menghasilkan panjang string.
Syntax : length(s)
Contoh : n:=length(s);
Misal s:='pemrograman'; n akan sama dengan 11.

-Copy : mengkopi suatu ekstrak karakter dari sebuah string.
Syntax : copy(s,dari,banyaknya)
Contoh : st:=copy(s,5,3); mengekstrak 3 karakter dari s, dimulai dari karakter kelima.
Misal s:='Who are you ?'; st adalah 'are'.
catatan: bila indek lebih bear dari panjang string maka hasilnya akan kosong:
Contoh : st:=copy(s,15,4); { kosong} jika banyaknya string yang akan diekstrak lebih besar dari s,
maka hasilnya adalah bagian yang tersisa dari string.
Contoh : st:=copy(s,9,10); st hasilnya adalah 'you ?'

-Pos : menghasilkan posisi dari suatu substring dari suatu string.
Syntax : Pos(substr,s)
Contoh : n:=pos('are','Who are you ?'); { n:=5; }
Jika substring tidak ditemukan, maka hasilnya 0.

-Val : mengkonversi string ke numerik.
Syntax : val(strvar,numvar,errorcode)
strvar adalah variabel string yang akan dikonversi, numvar variabel numerik ( bisa integer atau real,
dan errorcode adalah variabel integer yang menyimpan error code (kode kesalahan).
Jika errorcode adalah 0, konversi berhasil. Sebaliknya, hal ini akan menunjukan posisi dimana pada
strvar yang menyebabkan kegagalan.
Contoh :
program konversiangka;
uses wincrt;
var s : string;
e : integer; r : real;
begin
write('masukkan angka : ');
readln(s);
val(s,r,e);
if e<>0 then writeln('salah pada posisi : ',e)
else writeln('itu adalah : ',r:4:3);
end.

-Str : mengkonversi numerik ke string.
Syntax : str(numvar,strvar)
Contoh :
program konversiangka_1;
uses wincrt;
var s : string;
i : integer;
begin
write('masukkan angka: ');
readln(i);
str(i,s);
writeln('itu adalah: ',s);
end.

-Concat : Menggabungkan dua atau lebih string.
Syntax : concat(s1,s2,...,sn)
Contoh : st:=concat(s1,s2); Jikas1='ABC' dan s2='DEF',
st akan menjadi 'ABCDEF' st:=concat('Borland ','Pascal ','ver. ','7.0');
akan menjadi 'Borland Pascal ver. 7.0'

-Insert : Menyisipkan suatu string ke dalam string yang lain.
Syntax : insert(asal,target,indek)
Contoh :
program sisip ;
uses wincrt;
var s1, s2 : string;
begin
s1:='tidak ';
s2:='saya bekerja';
insert(s1,s2,6);
writeln(s2); {saya tidak bekerja }
end.
Jika hasilnya lebih dari 255 maka akan terpotong menjadi 255.

-Delete : menghapus n karakter dari string s berawal dari indek i.
Syntax : delete(s,i,n);
Contoh :
program hapus;
uses wincrt;
var s : string;
begin
s:='saya seorang insinyur';
delete(s,6,3);
writeln(s); { 'saya sang insinyur'}
end.

-Fillchar : mengisi string s dengan karakter c sampai s sama dengan n-1 panjang karakternya.
Syntax : fillchar(s,n,c); Hati-hati : s[0] akan tertumpuki,
jangan lupa menambahkan s[0]:=chr(n-1); untuk menormalkannnya.
Contoh :
program isikarakter;
uses wincrt;
var s : string;
begin
fillchar(s,51,'=');
s[0]:=chr(50);
end.

Dasar Bahasa Pascal - Lesson 3

pemograman

Dasar Bahasa PASCAL - lesson 2

Tipe Data
Tipe data yang disediakan oleh PASCAL meliputi:
1. Tipe Data Sederhana
merupakan tipe data dasar yang sering dipakai oleh program, meliputi:
integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca),
dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori
a. Bilangan Integer
merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti
terlihat dalam keterangan dibawah.
keterangan dibawah menunjukkan jenis data, ukuran dalam memori dan rentang nilainya.

Tipe Data Ukuran Tempat Rentang Nilai
Byte 1 byte 0 s/d +255
Shortint 1 byte -28 s/d +127
integer 2 bytes -32768 s/d 32767
Word 2 bytes 0 s/d 65535
Longint 4 bytes 2147483648 s/d 2147483647

Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut
dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan
dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan
variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya,
Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa
menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.
-MaxInt bernilai 32.767
-MaxLongint bernilai 2.147.483.647.

contoh:
Program display_maxint;
uses wincrt;
begin writeln (maxint)
end.
maka Hasilnya: 32.767

b. Bilangan Real
Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan
secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11,
dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2.
Penggolongan tipe data bilangan real dapat dilihat pada keterangan dibawah.
keterangan dibawah mengenai Bilangan Real

Tipe Data Ukuran Tempat Rentang Nilai
real 6 bytes 2.9 x 10-39 s/d 1.7 x1038
single 4 bytes 1.5 x 1045 s/d 3.4 x 1038
double 8 bytes 5.0 x 10-324 s/d 1.7 x 10308
extended 10 bytes 3.4 x 10-4932 s/d 1.1 x 104932
comp 8 bytes -9.2x 1018 s/d 9.2x 1018

c. Char
tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat
dalam tabel ASCII (American Standard Code for Information Interchange).
Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus
dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte
untuk masing-masing data.

d. Tipe Data Boolean
merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah).
Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool.
Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program
yang sesuai dengan lingkungan Windows.
keterangan mengenai bolean

Tipe Data Ukuran Tempat
Boolean 1 byte
WordBool 2 byte
Longbool 3 byte

Sebagai bilangan ordinal boolean true mempunyai nilai 1(satu), sedangkan false nilainya adalah 0(nol).
Contoh:
Program display_bool;
uses wincrt;
begin writeln(ord(true));
writeln(ord(false));
end.
Hasilnya: 1 0 3.2.

Senin, 09 Juli 2007

Dasar Bahasa PASCAL - lesson 2

pemograman

Dasar Bahasa PASCAL - lesson 2

Tipe Data
Tipe data yang disediakan oleh PASCAL meliputi:
1. Tipe Data Sederhana
merupakan tipe data dasar yang sering dipakai oleh program, meliputi:
integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca),
dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori
a. Bilangan Integer
merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti
terlihat dalam keterangan dibawah.
keterangan dibawah menunjukkan jenis data, ukuran dalam memori dan rentang nilainya.

Tipe Data Ukuran Tempat Rentang Nilai
Byte 1 byte 0 s/d +255
Shortint 1 byte -28 s/d +127
integer 2 bytes -32768 s/d 32767
Word 2 bytes 0 s/d 65535
Longint 4 bytes 2147483648 s/d 2147483647

Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut
dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan
dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan
variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya,
Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa
menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.
-MaxInt bernilai 32.767
-MaxLongint bernilai 2.147.483.647.

contoh:
Program display_maxint;
uses wincrt;
begin writeln (maxint)
end.
maka Hasilnya: 32.767

b. Bilangan Real
Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan
secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11,
dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2.
Penggolongan tipe data bilangan real dapat dilihat pada keterangan dibawah.
keterangan dibawah mengenai Bilangan Real

Tipe Data Ukuran Tempat Rentang Nilai
real 6 bytes 2.9 x 10-39 s/d 1.7 x1038
single 4 bytes 1.5 x 1045 s/d 3.4 x 1038
double 8 bytes 5.0 x 10-324 s/d 1.7 x 10308
extended 10 bytes 3.4 x 10-4932 s/d 1.1 x 104932
comp 8 bytes -9.2x 1018 s/d 9.2x 1018

c. Char
tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat
dalam tabel ASCII (American Standard Code for Information Interchange).
Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus
dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte
untuk masing-masing data.

d. Tipe Data Boolean
merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah).
Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool.
Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program
yang sesuai dengan lingkungan Windows.
keterangan mengenai bolean

Tipe Data Ukuran Tempat
Boolean 1 byte
WordBool 2 byte
Longbool 3 byte

Sebagai bilangan ordinal boolean true mempunyai nilai 1(satu), sedangkan false nilainya adalah 0(nol).
Contoh:
Program display_bool;
uses wincrt;
begin writeln(ord(true));
writeln(ord(false));
end.
Hasilnya: 1 0 3.2.

Dasar Bahasa PASCAL - lesson 1

pemograman

Dasar Bahasa PASCAL - lesson 1

Unsur-unsur Pemrograman
a. Mendapatkan data dengan membaca data dari default input (key board, file atau sumber data lainnya).
b. Menyimpan data ke dalam memori dengan struktur data yang sesuai,
c. Memproses data dengan instruksi yang tepat.
d. Menyajikan atau mengirimkan hasil olahan data ke default output (monitor, file atau tujuan lainnya).

Dalam mengolah data diperlukan pengelolaan instruksi terstruktur:
a. Beberapa instruksi dikelompokkan dalam satu blok atau model yang mengerjakan tugas tertentu.
b. Beberapa perintah dilaksanakan dengan persyaratan tertentu.
c. Beberapa perintah dilaksanakan berulang dengan jumlah pengulangan tertentu. Identifier Digunakan untuk nama:
Program, Sub-program (procedure dan function), nama: Variable, Constant, Type, Label.

Nama-nama ini digunakan untuk pemakaian dan pemanggilan dalam program. Ketentuan penulisan identifier
a. Nama identifier harus dimulai dengan karakter huruf alfabet: a sampai z, A sampai Z atau karakter '_'
(underscore - garis bawah)
b. Karakter berikutnya boleh karakter numerik (0 .. 9) atau kombinasi alphanumerik (huruf-numerik).
c. Panjang nama, pada berbagai versi Pascal umumnya antara 32 - 63.
d. Tidak boleh menggunakan karakter istimewa: + - * / | \ = < > [ ] . , ; : ( ) ^ @ { } $ # ~ ! % & ` " ' dan ?
Contoh penulisan:
Penulisan yang benar: X _PQR Beta Sudut_Alpha luasLingkaran
Penulisan yang salah: 3D sisi-Kanan B#

Jenis identifier
a. Identifier umum
Merupakan identifier yang didefinisikan sendiri oleh pemrogram.
Pemrogram mempunyai kebebasan untuk menentukan nama identifiernya,
dengan syarat nama tersebut tidak sama dengan identifier standar dan reserved word yang akan dibahas lebih lanjut.
Hal ini untuk mencegah kesalahan yang bisa timbul akibat tumpang tindih identifier dalam program.
b. Identifier Standar (Baku)
Merupakan identifier yang didefinisikan oleh pembuat kompiler Pascal.
Biasanya pembuat kompiler menyediakan suatu library yang sudah ada didalam kompiler.
Library berisi berbagai procedure, fungsi atau unit yang sudah siap pakai.
Misalnya Turbo Pascal Windows 1.5 memiliki suatu unit untuk memproses output yaitu wincrt, gotoxy,
yang dengan mudah bisa dipakai oleh programmer di dalam menuliskan kode-kode programnya.
Dinamai Identifier Standar karena suatu kompiler tidak harus memilikinya, masing-masing kompiler dimungkinkan
mempunyai identifier yang berbeda untuk suatu tugas yang hampir sama. Misalnya Turbo Pascal versi DOS menggunakan
crt untuk melakukan fungsi yang sama dengan wincrt (TPW 1.5). Beberapa Identifier Standar yang dimiliki oleh
kompiler-kompiler Pascal antara lain:
abs arctan boolean char cos dispose eof eoln exp false input integer ln maxint new odd ord output pack page
pred read readln real reset rewrite round sin sqr sqrt succ text true trunc write writeln
c. Identifier "reserved word", yaitu yang sudah didefinisikan dan digunakan oleh bahasa PASCAL sendiri
(Kita tidak bisa menamai identifier kita dengan ini).
and array begin case const div do downto else end file for forward function goto if in label mod nil not of or
packed procedure program record repeat set then to type until var while with

Deklarasi Variable:
Mendeklarasikan varibel adalah:
a. Memberikan nama variabel sebagai identitas pengenal
b. Menentukan tipe data variabel
Contoh deklarasi variabel:
var K : integer;
R : real;
C : char;
T : boolean;
Beberapa identifier yang sejenis bisa dideklarasikan bersamaan.
var i, j, k : integer;{Variabel i, j dan k sebagai integer}
namaMHS, alamatMHS : char; {Nama dan alamat mahasiswa }

Deklarasi Konstanta:
Mendeklarasikan konstanta adalah:
a. Memberikan nama konstanta sebagai identitas pengenal
b. Menentukan nilai konstanta
Contoh deklarasi konstanta:
const MaximumSize = 100; {integer }
ExitCommand = 'Q'; {char }

BAHASA PASCAL - pengantar

pemograman

BAHASA PASCAL - pengantar
1. Sejarah PASCAL
merupakan pengembangan dari bahasa ALGOL 60, bahasa pemrograman untuk sains komputasi.
Tahun 1960, beberapa ahli komputer bekerja untuk mengembangkan bahasa ALGOL,
salah satunya adalah Dr. Niklaus Wirth dari Swiss Federal Institute of Technology (ETH-Zurich),
yang merupakan anggota grup yang membuat ALGOL. Tahun 1971, dia menerbitkan suatu spesifikasi
untuk highly-structured language (bahasa tinggi yang terstruktur) yang menyerupai ALGOL.
Dia menamainya dengan PASCAL (seorang filsuf dan ahli matematika dari Perancis)
Pascal bersifat data oriented, yaitu programmer diberi keleluasaan untuk mendefinisikan data sendiri.
Pascal juga merupakan teaching language (banyak dipakai untuk pengajaran tentang konsep pemrograman).
Kelebihan yang lain adalah penulisan kode Pascal yang luwes, tidak seperti misalnya FORTRAN,
yang memerlukan programmer untuk menulis kode dengan format tertentu.
Bentuk dasar program Pascal adalah seperti berikut:

program TITLE ;
begin pernyataan;
pernyataan
end.


2. PASCAL sebagai bahasa terstruktur Sebagai bahasa terstruktur, PASCAL mempunyai ciri-ciri sebagai berikut:
- Berurutan
Susunan dari kode-kode dalam teks Pascal harus ditulis secara urut dari atas,
pernyataan-pernyataan yang ditulis lebih awal akan dieksekusi lebih dahulu. Oleh karena itu,
suatu pernyataan yang menyangkut suatu variabel di dalam program, maka variable itu harus terdefinisi
dahulu sebelumnya. Hal ini terutama menyangkut pada pemanggilan sub-program oleh sub-program yang lain.
Bisa dibaca lebih lanjut pada bagian sub-program.
- Blok dengan batas-batas yang jelas.
Pascal memberikan pembatas yang jelas pada tiap-tiap blok, seperti pada blok program utama,
sub-program, struktur kontrol (pengulangan/ pemilihan), dll. Pemakaian kata kunci begin untuk mengawali
operasi pada blok dan end untuk menutupnya memudahkan programmer menyusun programnya dengan mudah.
Seperti contoh:

If X>0 then
begin Write ( ‘ bilangan positif’);
Writeln ( ‘ program selesai’);
end;

- Satu pintu masuk dan satu pintu keluar pada blok pemilihan dan pengulangan.
Contoh di atas juga mengilustrasikan pintu masuk tunggal pada suatu blok pemilihan yaitu
suatu test logika X>0, dengan pintu keluaran yang satu pula (satu disini maksudnya bukan dua baris
perintah output tapi suatu paket perintah yang dirangkai dengan begin .. end.


3. Bakuan PASCAL
Dibakukan oleh ISO pada tahun 1983 dan dikembangkan dalam beberapa versi, diantaranya:
USCD PASCAL, MS PASCAL, TURBO PASCAL dll. Dengan semakin berkembangnya teknologi dalam komputasi,
Pascal dimanfaatkan untuk pengembangan DELPHI (berasal dari nama suatu kota di masa Yunani kuno),
suatu bahasa pemrograman visual yang menonjolkan pada efek grafis dan orientasi pada objek-objek yang siap dipakai,
karena memiliki Visual Component Library (VCL).


4. Struktur Bahasa PASCAL secara umum
Pascal mempunyai struktur sebagai berikut:
1. Bagian Judul Program
2. Bagian Deklarasi
a. Deklarasi tipe data (TYPE)
b. Deklarasi variabel (VAR)
c. Deklarasi konstanta (CONST)
d. Deklarasi label (LABEL)
e. Deklarasi sub-program (PROCEDURE dan FUNCTION)
3. Bagian Program Utama Perintah-perintah.


Teks Pascal setidaknya memiliki bagian Judul Program, bagian Deklarasi, dan Bagian Program Utama
yang berupa perintah-perintah. Sedangkan untuk bagian deklarasi menyesuaikan dengan isi dari program itu sendiri.
Contoh program PASCAL:

contoh 1
program TAMBAH_00; { Menjumlahkan dua bilangan yang nilainya diberikan dalam perintah}
var X, Y, Z: integer; { Deklarasi variabel X,Y dan Z sebagai bilangan bulat }
BEGIN { Program Utama Mulai }
X := 50; { Perintah memberikan nilai 50 pada var. X }
Y := 25; { Perintah memberikan nilai 25 pada var. Y }
Z := X + Y; { Perintah menjumlahkan X dan Y serta menyimpan hasilnya ke Z}
END. { Akhir Program Utama }

Pada contoh ini nilai X dan Y tidak bisa sembarang, karena didefiniskan tertentu.
Agar nilai X dan Y bisa bebas ditentukan, nilai X dan Y dibaca dari default input.


contoh 2
program TAMBAH_01; { Menjumlahlan dua buah bilangan yang dibaca dari default input }
var X, Y, Z: integer; { Deklarasi variabel X,Y dan Z sebagai bilangan bulat }
BEGIN { Program Utama Mulai }
read(X); { Membaca nilai X lewat key-board }
read(Y); { Membaca nilai Y lewat key-board }
Z := X + Y; { Menjumlahkan X dan Y serta menyimpan hasilnya ke Z }
write(Z); { Menyajikan Z ke layar monitor }
END. { Akhir Program Utama }

pada contoh ini, kita dapat memasukkan nilai x dan y sembarang
karena pembacaan inputan dilakukan melalui user dan diinputkan
dari keyboard.

UPS vs Stabilizer

pengetahuan


UPS vs Stabilizer

Spike adalah voltage yang turun tiba2.
Spike tidak bisa diatasi oleh stabilizer maupun UPS.



Paku paku kecil dalam gelombang sinus ini dihilangkan dengan cara :

a. low pass filter. Inget kan Fourier transform, bahwa any signal bisa
diurai menjadi sekian deret sinus yang lebih sederhana yang frekuensinya
lebih tinggi. Nah LPF ini di set supaya melewatkan sinus dengan frekuensi
yang diinginkan dan meredam harmonik yang tidak perlu

b. dengan voltage clipper. Biasanya varistor yang dipakai. Begitu ada
tegangan yang melewati treshold tertentu, varistor akan short circuit dan
membuang energi spike tersebut ke panas. Karena durasi spike yang sangat
kecil maka OK OK saja short circuit ini terjadi. Tapi kalo durasi naiknya
tegangan itu lama, yaitu surge, otomatis varistor akan short circuit
kelamaan, kepanasan dan hangus.



Kalau untuk menanggulangi surge dan brown out, memang dipakai stabilizer.
Jadi begitu ada kejadian tegangan turun atau tegangan naik, transformer
dalam stabilizer akan mengubah harga induktansi kumparan primer dan
sekundernya agar tegangan yang keluar tetap.
Ini bisa dijalankan dengan beberapa cara :

a. menggerakkan kumparan primer (atau sekunder) sehingga jumlah lilitan
yang saling bertemu muka berubah. Ini kudu menggunakan motor listrik,
makanya sering disebut juga servo controlled stablizer. Harganya mahal,
reaksi tidak begitu cepat, tapi presisi secara analog.

b. menggunakan kumparan sekunder yang multi point tapnya. Jadi diperoleh
output dengan multi tegangan. Kemudian ada relay yang memilih tap point
mana yang menghasilkan tegangan yang diinginkan. Cara ini murah, reaksi
cepat, tapi tidak presisi. Dan ini adalah stabilizer yang banyak dijual di
pasaran.

c. mengubah harga mutual inductance dari kumparan primer dan sekunder. Bisa
dengan cara menggeser-geser core dari kumparan, atau memasukkan medan
listrik lain untuk merubah harga....uh apa sih namanya buat inti.
Permeabilitas core? Ah lupa deh. Mbuh ah, pada intinya tujuannya dengan
perubahan mutual inductance ini akan menghasilkan tegangan keluaran yang
bisa diatur atur. Cara ini mahal, reaksi cepat, dan presisi secara analog.



Kebanyakan power supply di dunia komputer adalah switching power supply,
dimana keunggulannya adalah dia dapat merubah rubah kecepatan switching
bergantung pada tegangan input atau tegangan output. Misalkan tegangan
output yang diminta adalah tetap, dia akan bekerja makin cepat jika
tegangan input turun, dan mengurangi kecepatan switching jika tegangan
input naik. Jadi sebetulnya tidak perlu tuh stabilizer untuk switching
power supply ini.

Stabilizer mungkin baru diperlukan kalau kondisi sbb :

a. Misalkan switching power supply (SPS) dirancang untuk tegangan 180-240
volt. Tapi kemudian terjadi brown out sampai 160V atau surge sampai 260V.
Di sini stabilizer mampu melakukan preconditioning sehingga tegangan input
SPS tetap ada dalam nominal range. Tapi ya kondisi ini sudah tidak sehat
sebetulnya, mestinya komputer jangan dioperasikan di lingkungan seperti ini.

b. Misalkan pada tegangan nominal 220V, SPS sudah hampir 100% loaded. Tiba
tiba terjadi surge, sehingga kecepatan switching SPS harus naik, lalu jebol
karena sudah diluar toleransi dia. Di sini stabilizer ada gunanya. Tapi ya
itu, it is a bad design, menggunakan SPS tanpa toleransi beban yang cukup.



Nah kalo kepingin punya stabilizer, buat komputer cukuplah beli yang pakai
relay itu. Murah dan efektif.
sementara UPS itu sesuai namanya adalah 'uninterruptible power supply', jadi
ya tujuannya mempertahankan supply listrik supaya tidak putus kalau listrik
mati ?
Itu memang betul. Tapi di lain pihak UPS karena punya source energi sendiri
(battery) dan punya pembangkit listrik sendiri (inverter) dia bisa
dijadikan "trusted" power source kan? Jadi kalo misalkan power line-nya
ngaco, misalkan ada surge atau brown out, tinggal diputus saja power
line-nya, lalu nyalakan inverter milik UPS, mengambil energi dari battery.
Rata rata UPS punya kemampuan ini kok. Jadi gak hanya kalo power line mati
total dia bertindak sebagai emergency power line. Pada UPS type online,
lebih ekstrem lagi, karena tenaga selalu diambil dari battery, diharapkan
sumbernya lebih "trusted" daripada mengambil dari PLN, misalkan, yang doyan
mati berjam jam seperti kasus di Jakarta kemarin :)

Kebanyakan produk UPS sudah punya line filter, varistor, dan UPS sendiri
dalam satu kotak, jadi sekarang tinggal beli misalkan merek APC, Bauma,
Best, semua sudah bagus sekali dipakai untuk melindungi komputer.

KATA-KATA BIJAK DARI CEO KELAS DUNIA

KATA-KATA BIJAK DARI CEO KELAS DUNIA
************************************

Takut akan kegagalan seharusnya tidak menjadi alasan
untuk tidak mencoba sesuatu.

Kepemimpinan adalah Anda sendiri dan apa yang Anda
lakukan.

Frederick Smith,
Pendiri Federal Express
**************************

Kejujuran adalah batu penjuru dari segala kesuksesan,
Pengakuan adalah motivasi terkuat.

Bahkan kritik dapat membangun rasa percaya diri saat
"disisipkan" diantara pujian.

May Kay Ash,
Pendiri Kosmetik Mary Kay
**************************

Jika Anda dapat memimpikannya, Anda dapat
melakukannnya.

Ingatlah, semua ini diawali dengan seekor tikus,
Tanpa inspirasi.... kita akan binasa.

Walt Disney,
Pendiri Walt Disney Corporation
**************************

Uang merupakan hamba yang sangat baik, tetapi tuan
yang sangat buruk.

P.T. Barnum,
Anggota Pendiri Sirkus Barnum & Bailey
**************************

Sumber kekuatan baru bukanlah uang yang berada dalam
genggaman tangan beberapa orang, namun informasi di
tangan orang banyak.

John Naisbitt,
Pemimpin Umum Naisbitt Group
**************************

Jenius adalah 1 % inspirasi dan 99 % keringat.
Tidak ada yang dapat menggantikan kerja keras.
Keberuntungan adalah sesuatu yang terjadi ketika
kesempatan bertemu dengan kesiapan.

Thomas A. Edison,
Penemu dan Pediri Edison Electric Light Company
**************************

Ketika satu pintu tertutup, pintu lain terbuka;
namun terkadang kita melihat dan menyesali pintu
tertutup tersebut terlalu lama hingga kita tidak
melihat pintu lain yang telah terbuka.

Alexander Graham Bell,
Penemu dan Mantan Presiden National Geographic Society
**************************

Jangan biarkan jati diri menyatu dengan pekerjaan
Anda.

Jika pekerjaan Anda lenyap, jati diri Anda tidak akan
pernah hilang.

Gordon Van Sauter,
Mantan Presiden CBS News
**************************

Hari ini Anda adalah orang yang sama dengan Anda di
lima tahun mendatang, kecuali dua hal : orang-orang di
sekeliling Anda dan buku-buku yang Anda baca.

Charles "Tremendeous" Jones,
Presiden Life Management Services, Inc.
**************************

Yang terpenting dalam Olimpiade bukanlah kemenangan,
tetapi keikutsertaan ...

Yang terpenting dari kehidupan bukanlah kemenangan
namun bagaimana bertanding dengan baik.

Baron Pierre de Coubertin,
Pendiri & Presiden pertama Komite Olimpiade
International
**************************

Kebahagiaan biasanya merupakan hasil dari sebuah
pengorbanan.

Sebelum tidur, bertanyalah, kebaikan apa yang sudah
kulakukan hari ini ?

Sabtu, 07 Juli 2007

joke : tipe kondom lokal

@@@@@@@@@@@@@@@@@@@

berikut ini adalah beberapa tipe kondom yang harus kalian tau
dan kondom2 ini adalah buatan dalam negeri alias Kondom Lokal


Kondom Panther . . : " nyaris tak bersuara . . . . . "

Kondom TOSHIBA : " Dunia Mengakuinya . . . . . "

Kondom Extra Joss : " Merubah ngos menjadi joss . . . . "

Kondom Jarum Super : " Yang penting rasanya bung ! "

Kondom Telkom : " Setia melayani anda "

Kondom AXE : " Kesan pertama begitu menggoda . . . "

Kondom Indosiar : " Memang untuk anda "

Kondom Rexona : " Setia Setiap Saat "

Kondom Kapal Api : " Jelas lebihenaak . . . "


yang jelas this is only joke....
you can belived or not
see u

@@@@@@@@@@@@@@@@@@@

bentuk muka vs style kacamata

bentuk muka vs style kacamata

kadang bagi orang yang memiliki penglihataan yang
kurang alias memiliki mata bermasalah, mereka terkadang
menggunakan alat bantu untuk mengatasi masalah mereka..
baik itu menggunakan soft lensatau kacamata
dan hal ini juga yang terkadang saya alami ^u^
pemilihan kacamata sangat berpengaruh bagi mereka yang
menggunakannya baik itu besarnya bingkai..ketebalan lensa
sampai dengan style dari frame kacamata
nah..berikut adalah sedikit masukkan buat yang memiliki
nasib seperti saya alias menggunakan kacamata

1. wajah oval
dapat menggunakan hampir semua bentuk frame
asalkan tidak terlalu besar ataupun kecil dibandingkan
dengan besar kecilnya muka mereka :)

2. wajah bulat
frame yang sesuai untuk wajah bulat adalah bentuk persegi
atau kotak agar wajah terlihat lebih panjang dan kusus
hindari pemakaian frame bulat (ntr tambah bulet deh ^U^)

3. wajah kotak
pilih kacamata oval klasik,bulat atau cat eye. agar tidak
berkesan kaku maka hindari frame berpotongan tajam yang
dapat memberikan kesan lebar pada bagian dahi kita juga
pada pipi

4. wajah panjang
hindari frame yang pipih memanjang kesamping. frame lebih baik
menutup alis agar terkesan wajah tidak telalu panjang. bentuk
bulat dan kotak akan memberikan efek dramatis pada wajah
yang panjang (dramatis..kaya nonton film aja y ^U^)

5. wajah persegi
diajurkan memakai frame berbentuk persegi banyak,elips dan frame
rimless.

6. wajah segitiga
wajah yang memiliki dagu lancip atau dahi lebar dianjurkan memakai
kacamata dengan bingkai logam tanpa lis.

nah mybe segini dlu..next dilanjutin....
would you be my frendz....?
contact :
crbnku@gmail.com
kodokmen.blogspot.com