Hello

makan makan

Jumat, 05 Juni 2009

pEmBeLAjar

| | 0 komentar

PemBeLajaraN sEorang peMbeLajar

ManUsia aDalah sAtu-SatuNya Makhluk yang berpotEnsI unTuk BeLajar TenTang dirinya, Lalu bRusAha bElajr mNjadi diRinya seNdiri, dengan Cara BeLjar Mengekspresikan poTensinya.

PembEljr bEruSaha MengeNali keKuatan, baKAt, talenTa, dan Juga KelemAhan"nyA, bErJaung MenerIma Diri apA adAnya.....

pEmBeLajar bRusHA mEruMuskan HubgaN aNtara diriNya denGan TuhaN yang dIpercayaiNya, juga KetErkaitan aNTara diRinYa deNgN LinGkungN...
Read more...

JaLAn CinTa

| | 0 komentar

Alkisah, di suatu pulau kecil tinggallah berbagai benda abstrak ada CINTA, kesedihan, kegembiraan, kekayaan, kecantikan dan sebagainya. Mereka hidup berdampingan dengan baik. Namun suatu ketika, datang badai menghempas pulau kecil itu dan air laut tiba-tiba naik dan akan menenggelamkan pulau itu.

Semua penghuni pulau cepat-cepat berusaha menyelamatkan diri. CINTA sangat kebingungan sebab ia tidak dapat berenang dan tidak mempunyai perahu. Ia berdiri di tepi pantai mencoba mencari pertolongan. Sementara itu air semakin naik membasahi kakinya.

Tak lama CINTA melihat kekayaan sedang mengayuh perahu, “Kekayaan! Kekayaan! Tolong aku!,” teriak CINTA “Aduh! Maaf, CINTA!,” kata kekayaan “Aku tak dapat membawamu serta nanti perahu ini tenggelam. Lagipula tak ada tempat lagi bagimu di perahuku ini.” Lalu kekayaan cepat-cepat pergi mengayuh perahunya. CINTA sedih sekali, namun kemudian dilihatnya kegembiraan lewat dengan perahunya. “Kegembiraan! Tolong aku!,” teriak CINTA. Namun kegembiraan terlalu gembira karena ia menemukan perahu sehingga ia tak dapat mendengar teriakan CINTA. Air semakin tinggi membasahi CINTA sampai ke pinggang dan CINTA semakin panik.

Tak lama lewatlah kecantikan “Kecantikan! Bawalah aku bersamamu!,” teriak CINTA “Wah, CINTA kamu basah dan kotor. Aku tak bisa membawamu pergi. Nanti kau mengotori perahuku yang indah ini,” sahut kecantikan. CINTA sedih sekali mendengarnya. Ia mulai menangis terisak-isak. Saat itulah lewat kesedihan “Oh kesedihan, bawlah aku bersamamu!,” kata CINTA. “Maaf CINTA. Aku sedang sedih dan aku ingin sendirian saja..,” kata kesedihan sambil terus mengayuh perahunya. CINTA putus asa.

Ia merasakan air makin naik dan akan menenggelamkannya. Pada saat kritis itulah tiba-tiba terdengar suara “CINTA! Mari cepat naik ke perahuku!” CINTA menoleh ke arah suara itu dan cepat-cepat naik ke perahu itu, tepat sebelum air menenggelamkannya. Di pulau terdekat, CINTA turun dan perahu itu langsung pergi lagi. Pada saat itu barulah CINTA sadar bahwa ia sama sekali tidak mengetahui siapa yang menolongnya. CINTA segera bertanya pada penduduk pulau itu. “Yang tadi adalah WAKTU,” kata penduduk itu “Tapi, mengapa ia menyelamatkan aku? Aku tidak mengenalinya. Bahkan teman-temanku yang mengenalku pun enggan menolong” tanya CINTA heran “Sebab HANYA WAKTULAH YANG TAHU BERAPA NILAI SESUNGGUHNYA DARI CINTA ITU”

Read more...

TIPS JADIKAN BLOG TERKENAL

| | 0 komentar


1.Tulislah artikel menarik yang kontroversial berdasarkan opini anda yang didasari argumen logis, bukan opini yang melewati batas-batas , "misalnya rahasia cepat balajar Blog"...wehehe..!

3.Berikan pada pembaca anda barang-barang gratis. misalnya wallpaper,musik,software, untuk di downlad.

4.Tulis atau review blogger lain yang anda sukai lalu beri tau lewat komentar di blog yangg anda tulis tersebut ,hal ini untuk menarik pengunjung blogger tersebut membaca blog anda.

5.Lakukan interview lewat email kepada beberapa blogger terkenal tanyakan tentang berbagai opini yang positif, ini cara yang masih banyak dipakai para blogger yang cerdik, karena interview ini biasanya memberikan kebanggaan pada blogger terkenal tersebut dan biasannya anda akan di review balik...hehehe...kamu ketauan..

6.Promosikan dengan bijak alamat blog anda lewat SMS rekan anda , misalnya "Ma'af saya telat membalas, karena lagi menyelesaikan tulisan di libi3zed.blogspot.com"

7.Carilah info-info yang paling populer atau lagi hangat-hangatnya
Read more...

Sabtu, 30 Mei 2009

| | 0 komentar

RECORD (REKAMAN)

Sebuah record rekaman disusun oleh beberapa field. Tiap field berisi data dari tipe dasar / bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya (di banding array). Cara pendeklarasian dari record adalah sbb: • Mendefinisikan tipe dari record (jumlah field, jenis tipe data yang dipakai),
• Mendefinisikan variabel untuk dilakukan operasi.

SYNTAX
type
nama_record = record identifier_1 : tipe_data_1; : : identifier_n : tipe_data_n; end;var variabel : nama_record;
Contoh.
type
Data_mahasiswa = record Nama : string; Usia : integer; Kota : String; Kodepos : integer; end; Var x: Data_mahasiswa;
1. Pengaksesan Elemen Record Nama variable disertai nama field.
x.Nama x.Usia x.Kota x.Kodepos
Contoh.
program RECORD_INTRO; type tanggal = record bulan, hari, tahun : integer; end; var waktu : tanggal; begin waktu.hari :=25; waktu.bulan:=09; waktu.tahun:= 1983; writeln('hari ini adalah ',waktu.hari,':',waktu.bulan,':', waktu.tahun) end.
2. Pengunaan With … do Pernyataan with untuk lebih menyederhanakan pengaksesan field-field pada record. Pemrograman dapat mengakses field cukup dengan menyebutkan nama field-nya saja. Misalkan pernyataan :
x.Nama x.Usia x.Kota x.Kodepos
menjadi
with x do Begin Nama Usia Kota Kodepos end
Read more...
| | 2 komentar

Dasar Bahasa PASCAL

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). 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
Read more...
| | 0 komentar

Operasi pada Array

Sifat masing-masing elemen array mengikuti jenis data yang dimilikinya, untuk array dengan tipe bilangan integer atau real kita bisa melakukan berbagai standar operasi aritmatika seperti penjumlahan, perkalian, pengurangan, dsb. Yang perlu di garis bawahi, bahwa sifat dari array dimanfaatkan untuk operasi matrik.
a. Mencari Harga Tertentu pada Array
Mencari suatu elemen data di dalam suatu data merupakan suatu kejadian yang sering kita alami, contoh: mencari nama mahasiswa dari daftar presensi. Pencarian beruntun (sequence), merupakan suatu teknik untuk mencari suatu elemen dalam suatu sistim yang lebih besar. Contoh. Misal array A[8], dengan elemen sbb: A 60 12 76 23 11 42 18 42 Untuk mencari apakah bilangan x=11 ada didalam tabel maka dilakukan pemeriksaan terhadap :60 12 76 23 11Sehingga ditemukan x pada elemen ke-5, dalam bahasa PASCAL diterjemahkan seperti berikut:
type PITA = ARRAY [1..8] of integer; var AKU: PITA;procedure CARI_MATRIK(AKU: PITA); var i: integer; {faktor pengulang} begin for i:=1 to 8 do begin if AKU[i]:= 11 then writeln(‘ terdapat bilangan 11 dalam pita ini ‘); else writeln(‘ tidak ada bilangan 11, pencarian berhenti ‘); end; end;

b. Mencari Harga Maksimum pada Array
Misal array di atas kita cari harga yang tertinggi, maka kita perlu menentukan nilai tertinggi dahulu sebelum melakukan pencarian ; diawali dengan nilai maksimum=0
procedure CARI_MAKSIMUM(AKU: PITA); var i: integer; {faktor pengulang} MAKS : integer; begin MAKS := AKU[1]; for i:=1 to 8 do begin if AKU[i]> MAKS then MAKS:= AKU[i]; End; Writeln(‘NILAI MAKSIMUM = ’,MAKS); end;
Read more...
| | 0 komentar

SORT

Definisi Sort

Sort adalah proses pengurutan data yang sebelumnya disusun secara acak sehingga menjadi tersusun secara teratur menurut suatu aturan tertentu.

Pada umumnya terdapat 2 jenis pengurutan :

v Ascending (Naik)

v Descending (Turun)

Contoh :

Data Acak : 5 6 8 1 3 25 10

Terurut Ascending : 1 3 5 6 8 10 25

Terurut Descending : 25 10 8 6 5 3 1

Untuk melakukan proses pengurutan tersebut dapat digunakan berbagai macam cara / metoda. Beberapa metoda diantaranya :

a) Buble / Exchange Sort

b) Selection Sort

c) Insertion Sort

d) Quick Sort

Bubble / Exchange Sort

Memindahkan elemen yang sekanag dengan elemen yang berikutnya, jika elemen sekarang > elemen berikutnya, maka tukar

Proses :

Langkah 1 :


Pengecekan dapat dimulai dari data paling awal atau paling akhir. Pada contoh di samping ini pengecekan di mulai dari data yang paling akhir. Data paling akhir dibandingkan dengan data di depannya, jika ternyata lebih kecil maka tukar. Dan pengecekan yang sama dilakukan terhadap data yang selanjutnya sampai dengan data yang paling awal.

Langkah 2 :

Proses di atas adalah pengurutan data dengan metoda bubble ascending.

Untuk yang descending adalah kebalikan dari proses diatas.

Berikut penggalan listing program Procedure TukarData dan Procedure Bubble Sort.

Procedure TukarData

Procedure TukarData(var a,b : word);

Var c : word;

Begin

c:=a;

a:=b;

b:=c;

end;

Procedure Bubble Sort Ascending

Procedure Asc_Bubble(var data:array; jmldata:integer);

Var i,j : integer;

Begin

For i:= 2 to jmldata do

For j:= jmldata downto I do

If data[j] <>

Tukardata (data[j], data[j-1]);

end;

Untuk pengurutan secara descending anda hanya perlu menggantikan baris ke-6 dengan berikut ini :

If data[j] > data[j-1] then

Selection Sort

Membandingkan elemen yang sekarang dengan elemen yang berikutnya sampai dengan elemen yang terakhir. Jika ditemukan elemen lain yang lebih kecil dari elemen sekarang maka dicatat posisinya dan kemudian ditukar. Dan begitu seterusnya.

Read more...
 
 

LiBiE | Diseñado por: Compartidísimo
Con imágenes de: Scrappingmar©

 
top