Harapan dan Kenginan

Setiap orang mempunyai keinginan atau dengan kata lain cita – cita atau harapan. Tapi mungkin harapan atau cita – cita itu dapat terwujud atau tidak, itu semua tergantung diri kita sendiri apakah harapan itu hanya sebagai angan – angan atau hal yang emang harus di wujudkan. Ada sebait kata – kata yang selalu aku ingat Jangan takut akan bermimpi karena dengan bermimpi itu merupakan wujud dari suatu harapan walaupun harapan itu tidak pasti.Logika ku berkata benar juga kata kata itu. karena dengan bermimpi anda bisa mengetahui siapakah anda, dan apa yang anda ingin lakukan. Terkadang orang mensepelekan yang namanya mimpi. dalam pemikiran mereka apalah itu mimpi, cuman bunga tidur, atau sekedar kebahagiaan sesaat yang harus dibuang.Itu adalah sebagian dari pendapat mereka yang kalo menurut aku pemikiran yg sempit. Coba anda bayangkan jika hidup itu tidak ada harapan, apa yg anda rasakan? kehidupan yg membosankan, tiada arah yang pasti, dan tidak ada tantangan dalam hidup. apakah anda termasuk orang seperti itu? wah kalo bisa pemikiran seperti itu dibuang jauh – jauh. Kehidupan yang tiada Warna – warni, mengikuti lurusnya air mengalir. Tapi kalo anda orang yang mempunyai harapan, pasti anda orang yang berjiwa semangat, selalu menikmati tantangan yang datang, dan terus berjuang demi mencapai cita – cita. jika anda orang seperti itu, maka berbahagialah karena anda orang yang akan meraih kesuksesan.Saat awal anda bermimpi, dan berharap untuk terwujud, Maka anda bertekad untuk meraih angan – angan itu. Walaupun yang terjadi adalah kegagalan.Kegagalan itu merupakan awal untuk meraih kesuksesan. Anda berusaha menghadapi tantangan kedepan yang akan terjadi sama anda. Menikmati perjuangan mencapai harapan dan keinginan itu. Percayalah dalam hati bahwa hal itu akan terwujud. jika anda percaya dan bertekad maka itu akan dapat terwujud.Aku melihat sesuatu hal yg membuatku terharu, lihatlah gambar ini di bawah ini :

lihat lah perjuangan anak itu, walaupun dia memiliki kekurangan dalam dirinya tapi dia memiliki kenginan untuk bisa memainkan sebuah biola. memberikan warna musik yang indah agar para pendengar bisa merasakan musik indahnya.Luar biasa sekali.Dia berjuang untuk meraih harapan kenginan nya. walaupun dia memiliki kekurangan, tapi dia bisa melakukan bermain biola. Dan dia buktikan sendiri bahwa dia bisa melakukannya. Apakah anda bisa seperti dia? ayo marilah kita tanamkan saya dan anda bisa meraih harapan dan kenginan itu..
Sukses buat anda.

kehidupan

kehidupan.. apa itu kehidupan… mungkin kita semua tau apa arti kehidupan di dunia ini. tapi tidak semua tau apa arti makna dari kehidupan.. kehidupan yang kita rasakan berawal dari kita bayi di dalam kandungan seorang ibu.Ibu memberi kasih sayang yang begitu luar biasa dari kita dikandungan sampai akhirnya kita membuka mata melihat indah nya dunia ini.Saat kita lahir di dunia ini, dan menghembuskan nafas angin yang sejuk di dunia ini, hidup begitu indah tiada hal – hal yang menyulitkan membuat sesak nafas didada atau membuat hati lara.Hal yang membuat indah ini adalah kasih sayang.Kasih sayang dari seorang yang dekat ama kita contohnya ibu, ayah, adik, pacar atau sahabat.Tapi ternyata Kehidupan ini bukan hanya datang keindahan tapi juga penderitaan. Disaat penderitaan datang yang ada didalam hati kelukaan, rasa marah, sedih, atau penyesalan. Saat indah datang kita begitu bahagia, dalam hati berkata kalau bisa kebahagiaan datang untuk selamanya. Tapi jika penderitaan datang hati pun bicara kenapa penderitaan bisa datang padaku.Yang ada hanya tangis dan jeritan hati yang luka. Tapi ketahuilah bahwa Tuhan memberi penderitaan agar umatnya menyadari kesalahan yang telah manusia lakukan.Terkadang kita tidak tau apa yang telah kita lakukan itu salah. dan kita tidak menyadari itu. Dan penderitaan itu adalah sebuah cobaan. Cobaan itu adalah ujian dari sang Pencipta. Cobaan itu berupa apakah manusia itu bisa menyelesaikan masalah yang dihadapinya. Dan apakah manusia itu bisa membimbing dirinya menjadi manusia yang lebih baik lagi. Ketika manusia merasakan penderitaan dan kebahagiaan itu dengan tulus maka itu lah makna kehidupan.Saat manusia mengalami kepurukan, dia mencoba untuk keluar dari kepurukan itu. Maka itu adalah kehidupan. Saat manusia mengalami kebahagiaan, manusia tersebut mencoba menutup mata nya dan sembari berdoa menikmati indahnya kebahagiaan itu. Dalam kehidupan ada bahagia ada derita. Dua – duanya searah berjalan.Kita tidak tau apakah hari ini atau besok kita mendapatkan kebahagiaan atau penderitaan. Tapi ketahuilah itulah kehidupan, saat engkau menutup mata dan menghirup secercah kebahagiaan dan penderitaan, tanpa engkau sadari itu adalah sebuah cerita yang akan tiada habisnya sampai engkau mati. Terkadang ada rasa ingin mati jika mengalami penderitaan, tapi mati itu lebih sakit dari pada mendapatkan kematian. Mati adalah sebuah hidup yang tidak akan pernah berjalan lagi. dan akhir cerita akan mati pula. Maka itu Buatlah kehidupan mu seperti nano nano, kadang asin, manis, dan asam. Rasakan lah kehidupan mu sendiri.. maka engkau akan tau apa yg engkau inginkan.. dan engkau akan tau makna dari kehidupan ini. Jika engkau tau maka bukalah matamu dan niatkan hati yg tulus jalani kehidupan ini. ^_^

SERCHING

well,,, hari ini di tempatku belajar serching,,, do you know searching in pascal? serching adalah digunakan untuk mencari suatu data yang tersimpan dalam file. Jadi jika kamu sudah menginput data dan kamu ingin mencari data kembali maka tinggal membuka data yang sudah anda simpan dengan menggunakan metode serching ini.

and then konsep proses searching yaitu:
1.Menyediakan tempat penyimpana
2.Menginputkan data yang mau dicari
3.Membandingkan nilai data yang mau dicari dengan nila data yang ada pada file yang sudah disimpan.

nah ini dia program nah teman – teman…

uses crt;
type dosen = record
kode : string[3];
nama : string[40];
pendidikan : string[10];
keahlian :string[40];
end;
var
fdos : file of dosen;
rdos : dosen;
i : byte;
xkd : string[3];
lg : char;
ketemu : boolean;

procedure opendosen;
begin
assign (fdos,’c:\dosen.dat’);
{$I-} reset (fdos);
{$I+} if IOresult 0 then rewrite (fdos);
end;

begin
opendosen;
repeat
i := 1 ;
ketemu := false;
gotoxy (10,5); write (‘kode:’); readln (xkd);
seek (fdos,0);
while not eof (fdos) do
begin
seek (fdos, i-1); read(fdos,rdos);
if rdos.kode=xkd then
begin
gotoxy(10,6); write(‘nama:’ ,rdos.nama);
gotoxy(10,7); write(‘keahlian:’,rdos.keahlian);
gotoxy(10,8); write(‘pendidikan:’,rdos.pendidikan);
ketemu := true;
end;
inc (i);
end;

rdos.kode := xkd;
if not ketemu then
begin
gotoxy(20,10); write(‘nama :’); readln(rdos.nama);
gotoxy(20,11); write(‘keahlian: ‘); readln(rdos.keahlian);
gotoxy(20,12); write(‘pendidikan: ‘); readln(rdos.pendidikan);
seek(fdos,filesize(fdos));
write(fdos,rdos);
end;
gotoxy(20,12); write(‘input lagi [Y/T]:’); readln(lg);
until upcase(lg) =’T’;
close(fdos);
end.

lalu kamu input dulu data – data dosen. setelah diinput jika kamu mau cari data kembali lagi
maka tinggal tulis kodenya maka data yang kamu input tadi akan muncul kembali

kehidupan itu penuh perjuangan

tadi diperusahaan ku.. aku gk sengaja mendengar dia berkata seorang pekerja mengeluh aku kerja bertahun – tahun tapi gaji ku segini gini aja. well jadi kasihan aku melihatnya. but pak coba anda berpikir kenapa gaji anda segitu gitu aja. anda bekerja malas, bekerja tunggu disuruh bos dan pekerjaan yang anda lakukan hanya bisa itu – itu aja( bapak ini buat rak piring aluminium). kadang aku berpikir apakah kebanyakan orang pribumi itu terima gaji besar dulu baru bekerja? aku lebih suka gaya para pekerja orang chines. mereka tidak melihat gaji itu. tapi mereka melihat kemampuan mereka sampai dimana untuk bisa menerima gaji itu. sekali sekali kita boleh mencontohi mereka, untuk membuat kita lebih baik lagi. tapi disini maksud aku bukan untuk membandingi antara orang pribumi sama orang chinese, tapi kita mencontohi kesuksesan mereka. mereka berjuang untuk sukses.kalo tidak sukses kata mereka belum jadi orang ( bukan orang utan yah wkkkwk). jadi apa salahnya kita mencontohi hal yang baik buat kita. manfaatnya kan baik buat kita. so jangan pernah mengeluh and tetap berusaha. dan yakin bahwa kita bisa sukses. kalo kita terjatuh anggap aja itu suatu cobaan buat kita. tapi kita harus tetap bangkit dan terus bangkit. sampai akhirnya kita mencapai kesuksesan itu. dan satu hal lagi teman teman jangan lupa berdoa. ^_^

god bless you

about my study,,,,,

oke lanjut ceritaku tentang studiku. well sometimes pelajaran kuliahku itu mudah,, sometime pelajaran kuliahku itu susah. kata orang – orang seh gak yang sulit kalo kita mao belajar. mao tao pelajaran apa yang sulit buatku itu pemograman struktur. dari awal belajar ampe sekarang tak ngerti ngerti. nanti kalo dah ngerti tiba-tiba besok lupa. kadang dalam hatiku menggerutu aku yg oon kale yah,, wkwkkwwk(weleh aneh aku bangga dengan kebodohanku 😦 tapi i always try..try..try… yang penting usaha dulu ajalah dalam otakku ini. pelajaran kuliah yg paling aku sukai adalah bahasa inggris and web desain. i like it so much,,, bahasa inggris itu kan perlu buat dunia kerja sekarang. apalagi perusahaan dah mengharuskan bisa inggris. bukan bangga seh,, but little little i can speak lah wkkwkwkw,,,, and then web desain wah ini aku demen karena aku suka banget desain-desain website gitu. makanya aku serius banget belajar web desain. but i hope i can study pemograman struktur, i know the lesson very important to me and future. because kuliahku kan komputer jadi harus bisa pemograman. malu ah anak komputer gak tao pemograman wkwkwkw ( pede kale bercakap ). well sampai sini dulu deh perjalanan studiku,, kalo ada waktu aku sambung lagi,,^_^

about my dream,, dream,,,

well i believe all the people in the world have a dream. and i have too. aku punya kenginan suatu hari aku bisa membahagiakan orang tuaku dengan prestasiku. walaupun aku sendiri gak isa membahagiakan mereka dengan materi. tapi untuk mencapai kenginan itu tidaklah mudah, aku harus berjuang untuk mendapatkannya. mencapai kenginan itu tidaklah semudah membalik tangan. aku tahu itu.. aku mengerti itu. tapi terkadang aku mengeluh capek dah berusaha tapi gak dapat – dapat. sampe akhir na aku menyerah. aku berdiam diri, hanya melihat orang yang sudah sukses. lalu tiba – tiba hatiku merontak my heart say that hey girl what are you doing? do you only stand up? only sad, only.. only,, only,, oh no don’t do it. pliz give up.. hatiku aja isa menjerit gitu sampe akhirnya aku menangis,, hatiku yg paling dalam isa berkata seperti itu. oh god i must to do something.. aku gak mau begini begini aja.. untuk menjadi orang yang berarti bagi orang yang kita sayangi, kita harus jadi orang yg lebih baik supaya mereka bangga sama kita. thx allah dah menyadarkan aku. aku akan terus berjuang sampai aku mendapatkan mimpiku.^_^

about my collage

well,, aku sekarang kuliah di stmk budidarma di jl. sisingmangraja. kata teman- teman kampus hijau. well aku liat seh warnya cantik,, hijau. hijau buat aku warna yang penuh keceriaan. selalu berekspresi and then penuh semangat. pertama kali masuk kuliah aku berpikir cuman satu gimana teman – teman ku nanti yah,, apa nyebelin atau gimana gt,,, kepikir yg negatif2 aja.. but wow amazing,, teman- temanku asik, gaul, gokil walupun kadang nyebelin.. its oke never mind buat aku deh. and then saat pertama menginjak kaki di tempat kuliahku waduh deg degkannya luar biasa. perasaan yang aku rasakan bermacam – macam. ada rasa takut, gelisah and then perasaan bangga juga jadi anak mahasiswa coy wkwkkwk,,,, terkadang juga gk percaya bisa jadi anak mahasiswa, sampe aku cubit-cubit pipi ku wkwkkkw,,, lalu aku belajar pertama ditempat kuliahan. karena dah agak lama gk pernah lama belajar, jadi agak oon jg neh. asli beneran lupa pelajaran waktu sma. but i never give up aku belajar trus sampe aku bisa memahami pelajaranku. and then sampai sekarang aku akan terus berusaha untuk belajar di tempat kuliah budidarma untuk menjadi seseorang yang memiliki moral yang baik dan memiliki ilmu pengetahuan yang berguna untuk masa depanku. I hope god always support me.

perjalanan hidupku

waktu kecil aku pernah bercita cita kepingin jadi orang sukses, kepingin dapat gelar sarjana…biasa kan anak kecil banyak banget angan angannya. tapi terkadang karena masih kecil cita – cita itu kulupakan saja,, karena aku masih ingin bermain.. masih ingin menikmati hidup ini. Saat tumbuh beranjak dewasa tiba – tiba cita – cita ku tumbuh lagi.. aku mencoba belajar terus.. tapi terkadang apa yg aku pelajari gk ada hasil yg memuaskan. sewaktu akhir sekolah sma… yang aku pikirkan kepingin bisa lanjut kuliah. tapi aku berpikir aku dah cukup banyak menyusahkan orang tuaku dengan banyak membiayai sekolahku dari sd, smp, sma. niat itu ku urungkan juga.sampai akhirnya aku mendapatkan kerja dan terus berusaha bekerja demi mencari uang untuk kuliah ku nanti. dan subhanallah aku gak nyangka kalo aku bisa kuliah sekarang ini. aku sungguh bersyukur banget pada allah. walaupun orang tuaku gak pernah setuju aku kuliah, tapi aku akan terus kuliah sampai aku mendapatkan gelar sarjana. terkadang aku heran kenapa orang tua ku itu tidak setuju aku kuliah. tapi yah sudahlah yang penting sekarang aku bahagia bisa kuliah dan terus belajar untuk menjadi orang yang berguna di mata orang tuaku walaupun kelihatannya orang tuaku gak bahagia dengan apa yg aku alami sekarang. thx allah dah meridhoi jalan hambamu ini.

program function

program lampetmu;
uses crt;
var n : integer;
function fak (m:integer) : integer;
begin
if ( m=1 ) or ( m=0 ) then
fak := 1
else
fak := m*fak (m-1)
end;
begin
clrscr;
write (‘masukkan bil : ‘);
readln (n);
writeln (‘harga faktorial : ‘, fak(n));
readln;
end.

tugas quiz gaji karyawan

uses crt;
type
pegawai = record
kode : string[3];
jabatan : string[10];
sts : string[10];
end;
var
rpeg : array[1..10] of pegawai;
gaji, tgaji : longint;
tnjg, tnjgk : real;
tot : real;
lg : char;
i,j : byte;

procedure inputpegawai;
procedure formpegawai;
begin
clrscr;
gotoxy(20,2); write(‘INPUT DATA GAJI PEGAWAI’);
gotoxy(10,3); write(‘_______________________________________’);
gotoxy(10,4); write(‘kode[1,2,3] :’);
gotoxy(10,5); write(‘jabatan :’);
gotoxy(10,6); write(‘status[menikah,belum] :’);
gotoxy(10,7); write(‘________________________________________’);
gotoxy(10,8); write(‘input lagi[Y/T]:’); readln(lg);
end;
begin
repeat
formpegawai;
with Rpeg[i] do
begin
gotoxy(27,4); readln(kode);
gotoxy(27,5); readln(jabatan);
gotoxy(27,6); readln(sts);
gotoxy(33,8); readln(lg);
end;
inc(i);
until upcase(lg)=’T’
end;

procedure tabelpegawai;
begin
clrscr;
gotoxy(3,3); write(‘laporan data gaji pegawai’);
gotoxy(3,4); write(‘______________________________’);
gotoxy(3,5); write(‘kode jabatan status’);
end;
procedure hitgaji(kd:string; var gaji:longint;tnjg:real; tnjk:real);
begin
if kd = ‘1’ then
begin
gaji :=2500000;
tnjg :=0.35;
end else if kd = ‘2’ then
begin
gaji := 2000000;
tnjg := 0.10;
end else if kd = ‘3’ then
begin
gaji := 1500000;
tnjg := 0.05;
end;

begin
i :=1;
inputpegawai;
for j:=1 to i-1 do
begin
with Rpeg[j] do
begin
hitgaji (kode,gaji>;