Pascal triangle in pascal


gw punya contoh program buat segitiga pascal, bisa dicoba..

hehe..
kalo masih ada yang kurang, mungkin bisa ditambahin ato dikoreksi lah kalo ada kesalahan..


--------------------------------------------------------
program PascalTriangle;
uses
crt;
var
i,j,n: integer;
x: array[1..100,1..100] of integer;
begin

clrscr;
write('Banyak baris: '); readln (n);

for i:=1 to n do

for j:=1 to n do

begin

if j=1 then x[i,j]:=1

else if j=i then x[i,j]:=1

else x[i,j]:=x[i-1,j-1]+x[i-1,j];
end;

for i:=1 to n do
begin
gotoxy(40-3*i,2+i);

for j:=1 to i do
write(x[i,j]:6);

end;

readln;
end.

-----------------------------------------------------

Keluhan dalam kesendirian..

Apa aku bodoh? Apa aku tak pernah mengertikanmu? Apa aku membuatmu menangis? Apa aku membuatmu brsedih?
Aku tak punya tempat lagi untuk mengeluh, tak ada lagi yang ingin mendengar ceritaku. Aku terlalu brengsek untuk menjadi orang yang baik. Aku terlalu bodoh untuk menjadi orang yang cerdas. Meski hatiku terkadang merintih, tapi slalu kucoba untuk bersabar. Munkin aku hanya bisa bersabar.

Aku tak ingin banyak bicara lagi. Aku tak ingin memuakkan lagi. Aku munkin bukan orang yang terbaik, tapi kupastikan, suatu saat aku akan lebih baik dari siapapun di dunia ini.

Coba kau lihat diriku. Coba kau dekap diriku. Coba kau simpan diriku di hatimu. Jangan takut kehilanganku, karena aku takkan meninggalkanmu.

Aku tak meminta balasan lebih, meski ku sakit, ku tetap bisa tersenyum. Meski dibalik senyumku, hatiku merintih.

Aku ingin tertidur, dan terbangun disambut senyummu, memberi tahuku, mimpi buruk sudah berakhir.

Aku takut kehilanganmu, tapi kau pergi menjauh dariku. Hatiku remuk saat kau menjauh, semakin retak saat kau pergi dan tak terlihat. Tapi hatiku takkan patah, karena ada rantai yg mengikat hatiku, yang menjaganya, yang melindunginya..

Rantai itu adalah cintaku untukmu..

Bersabarlah wahai diriku

Hidup bukanlah suatu yang perlu dinikmati. Hidup hanya sesaat, hanya sekali. Bukan untuk disiasiakan, bukan untuk dibuat tak berarti. Hidup hanya seperti dirimu dikala mengambil air sebuah sumur, untukmu minum kelak. Terlalu banyak kau ambil, hanya akan menjadi sia-sia, hanya melelahkanmu. Terlalu sedikit kau ambil, akan meringankanmu, tetapi akan menyiksamu saat kau harus mati kehausan.
Hidup ini hanyalah perhitungan manusia. Manusia berhitung, untuk dapat melakukan sesuatu dengan tepat, dengan perhitungan yang matang. Agar manusia dapat melalui jalan pulang dengan membawa air yang cukup, tak kurang, tak berat dan tak ringan.
Terkadang kita mendapat ujian di tengah jalan. Terkadang dirimu dikhianati oleh orang kepercayaanmu. Terkadang kau harus berkorban untuk orang di sampingmu.
Ketika dirimu bertemu teman di jalan pulang, kau bersama dengannya, berbagi suka dukamu selama di perjalanan. Menjadi penghiburmu dikala dirimu bersedih.
Tapi terkadang dirimu tak bisa serakah, ada kalanya dirimu harus menyimpan masalahmu, untuk memberikan wajah ceria, menghibur temanmu dikala senyuman hilang dari wajahnya. Terkadang kau membiarkan dirimu sakit, hanya agar temanmu itu tak sengsara. Menyembunyikan permasalahanmu, dikala temanmu itu membutuhkanmu.
Suatu saat ia akan mengerti. Kebahagiaannya adalah segalanya bagimu.
Karena ada cinta di hatimu.

Symphony of love #11

aku bukan seorang ksatria, tapi aku tak sepengecut seorang ksatria..
jangan hiraukan diriku, dan aku akan menikammu dari belakang..
aku takkan lari dari kenyataan, juga takkan bersembunyi darinya..
dekap tanganku, dan aku akan jatuh dalam pelukanmu..
cintailah aku, dan hatiku akan selalu jadi milikmu..

aku bukanlah seorang yang bodoh, aku memiliki hati untuk berfikir..
aku juga bukan orang yang tak punya hati, aku punya otak untuk merasa..
jujurlah padaku, dan aku akan selalu percaya padamu..
namun jangan percaya diriku, jika dusta slalu terucap dari bibirmu..
aku takkan mengerti, jika aku telah menutup diriku..

aku selalu berfikir, apakah yang terbaik untukmu..
aku selalu berbuat, membuat dirimu bahagia..
takkan ada artinya tawa bagiku, jika tanpa melihat tawamu..
takkan ada artinya bahagia bagiku, jika dirimu tersiksa bersamaku..
aku hanya seorang mahluk, hadir untuk menghiburmu..

tapi aku bukanlah penghibur, bukan pula hanya sebagai mainan..
aku hidup dan bernafas, dengan nama Tuhanku di setiap hela nafasku..
aku bukan orang yang baik, namun aku akan selalu berusaha jadi yang terbaik..
aku bukanlah orang y
ang bijak, namun aku slalu menyikapinya dengan bijaksana..
aku adalah aku, untukmu..

alunan dari sebuah cinta..



untuk bintang kecilku tersayang..

liburan nyambung..

liburan ternyata menyenangkan. yahh, walaupun gak sama pacar..
tapi secara keseluruhan liburan sminggu ini lumayan lah. lumayan bikin capek, bikin tambah item. Pulang liburan dapet hadian spesial dari pacar, abis tu pegi ke pante. whehe, lumayan lah bwat refresing.
jadi inget, belum jadi pr matematika. Malest mau ngerjain, enakan libur terus. Bisa tidur ampe siang, jalan-jalan..

» ada foto yang bagus, klik.. «

Libur??

Manusia emang gak pena besukur. Dikasi skolah pengan libur, dikasi libur, dyanya mau masuk..



wahh..
padahal libur cuma seminggu, gak ketemu pacar cuma 7 hari. Tapi gmana ya..
Kalo uda cinta, gak ktemu sehari aja, kesiksa rasanya. Apalagi gak ketemu sebulan, ato betaun-taun kayak di pilem perang-perang tu. Tiap ari SMS-an, telpon-telponan, masi aja tetep kangan. Uda ketemu seharian di skolah, pulangnya tetep aja kangen. Emang dasar lagi kasmaran, gak bisa jauh-jauh.


Liburan jauh dari pacar, dikelilingi gadis-gadis cantik di sekitar tempat libur. Waduuuwwh, sukur gw cwo setia, gak doyang ngelirik kanan-kiri, hehe :)


Asal dya gak selingkuh aja. Tapi gw pecaya koq ama dya, dya kan cwe gw tersayang. (awas aja kalo ampe diboongin).


Hmm...
Akh, gausa tralu dipikirin lah.. Waktu kan terus berjalan. Seminggu mah cetek..
bentar lagi juga selese.

Dya bilang gw butuh refresing, butuh liburan. Padahal gw cma butuh dya. Mw liburan ke desa, ngeliat sawah ngeliat pante, ngeliat gunung, ngeliat pemandangan. Tapi menurut gw, dya lbih cantik, lebih menarik, hehe..

Symphony of love #10

apa yang kau pikirkan?
apakah dirimu benar?
apakah hanya dirimu yang benar?
mengapa tak kau singkirkan ke-egoisanmu itu..
mengapa kau begitu kerasnya hingga kau tak menyadari..
kau telah menyayat hati seseorang..
mengapa begitu terlambat kau menyadari dirimu bersalah?
mengapa kau begitu angkuh, bertengger dengan kesombongan..
memuntahkan setiap nasihat untuk dirimu..
inilah diriku, tak ada yang perlu diubah,
aku suka diriku saat ini..
betapa sombongnya dirimu..
apalah artinya menjadi diri sendiri, bila itu menyakitkan hati orang lain..
tak ada artinya menyombongkan kekurangan saat kau bisa menutupinya..
mengapa tak kau ubah dirimu?
tak sanggup kau katakan..
apa salahnya berkorban untuk orang yang kita cintai..
apa salahnya mengubah diri untuk menjadi lebih baik..
tak lagi menyakiti orang yang kita cintai,
tak lagi melukai hati yang telah terluka..

satu cinta untuk cinta..
agar cinta itu terkenang selalu..



dedicated for everyone i love..
my friends and my girlfriend..

mataram, 19 april 2009

OSK 2009 bikin kram otak

pusingg....


ngerjain soal olimpiade komputer, bikin otak ngehank. Trus waktu ngerjain, kena kram otak. Bingung jadinya. Abis tu masih ada mid yang blum kelar lagi.
Huft...
malesst..





sukur ada yang nemenin..

Kenapa kamu bingung???

ada hal yang tidak bisa dimengerti di dunia inni...


dunia ini sulit untuk dimengerti..
jd.. pasrah aj dah...


nggak ada solusi, nggak ashiiik..


ada satu solusi untuk mengatasinya..

appa?


pahami dirimu, pikirkan tentang sesuatu yang bisa menyenangkan hatimu..
bila itu tak banyak membantu, temui orang-orang dekatmu..


udah.. tapi nggak membantuu..



itu artinya kamu masih belum menguasai dirimu...
ada sesuatu dalam dirimu yang tak bisa kau lepaskan

dan aku tidak tahu itu apppaaaaaaaaaa..


apa hal yang paling kamu sukai?

aku tidak tahu..


hmmmmm....
bener niii...


nggiggggggggggggggggggghhhhhhhh


kamu cuma bingung....
pikiranmu lagi kacau..


perbaikiin donk..


coba bwt relax...
tarik nafas yang dalam...
keluarkan dengan santai..



nggak ada perubahan...



apakah semuanya melelahkan hari ini?
tidur sayang...

good bye day

mengatasi kecerobohan

Mengapa sulit untuk mengungkapkan segalanya, mengapa berat untuk merealisasikan semuanya.
mengapa setiap pilihan yang ada selalu berakhir buruk,
mengapa sulit untuk mengubah segalanya...


karena...



kamu terlalu menganggap semuanya akan berakhir buruk padahal belum mencobanya


tetapi..

setiap aku melakukan sesuatu tindakan, aku hanya ingin membuat segalanya lebih baik..
tetapi aku terlalu ceroboh..


mengapa berfikir dirimu ini ceroboh? sebelum mencobanya dulu?


ok, aku akan mencoba segalanya...



buat apa menyerah sebelum mencoba...




orang yang kalah adalah orang yang menyerah sebelum mencoba..

jangan suka menyesali apapun tindakan yang telah kamu lakukan, apalagi setelah kamu meyakini itu adalah tindakan terbaik yang telah kamu lakukan

i need u'r help.. coz i can't do that alone..

jangan pernah bergantung pada orang laind..

akan ku coba menyelesaikannya sendiri, meski itu berat...


tidak ada yang berat...



makasi...

saranku bikin hopelesss..


biarin..

Link soal olimpiade komputer

Soal-Soal Olimpiade Komputer SMA (soal)

OSN_TOKI 2008 (Sesi1).pdf 338.71 KB
OSN_TOKI 2008 (Sesi2).pdf 391.59 KB
OSN_TOKI 2008 (Sesi3).pdf 309.34 KB

OSN_TOKI 2007 (PraktikumPemograman) 28.8 KB
OSN_TOKI 2006 (Praktikum Pemograman) 133.79 KB
OSN_TOKI 2005 (Praktikum Pemograman) 112.43 KB

Contoh Soal Analitik, OSK, dan Pascal

Sample_Analitik [TOKI].pdf 30.31 KB
Sample_OSK [TOKI].pdf 59.2 KB
Sample_Pascal [TOKI].pdf 26.37 KB

Selamat berjuang buat yang bakal bertarung di seleksi kota..

Ayik part 1

Punya cwe namanya ayik, bahagia?
jangan tanya..
ad sesuatu yang kurang rasanya kalo gak ada dya, sesuatu yang bikin qta gila..
gak tw apa. dya selalu bikin lupa semua masalah. bikin selalu kangen dya, selalu ngebayangin dya, pokoknya cma dya yang ada di kpala nii.
kalo di bilang cantik sii, enggak juga. Dya biasa aja,tapi tetep mempesona.
Baik?
gak juga.. hehe.. gak tralu sii :)
tapi slalu bikin hati adem, gak tau knapa. pokoknya, tiap ktemu ama dya, hati kayaknya adem baget.
tentang sifatnya?
aneh, narsisnya gde banget, lucu, keras kadang-kadang, tapi lembut, gak tw jg sii, tapi dya selalu lembut koq. hehe.. :P

anakjingga udah bahagia



setelah pikir punya pikir,
AJ mw happy aj skarang, gak ada alasan lagi bawat meratapi kesediahan. Hidup ini indah, kalo qta bawanya indah...

Symphony of love #9

Aku rindu akan tawanya,

namun kau memberikanku yg baru,

indah mengikis rasa sakit yg tlah membekas,

mengalahkan rasa marah,
menyibak rasa sejuk di hati..

Kau ingatkanku pada dirinya,

rasa snang dkatnya,

saat lentik gemulai jari membelai rambutnya,

harum bunga yg tersibak diantara kibasan angin..

Namun apalah arti,

hanya sesuatu yg semu..

Menyisakan perih yg membekas,

perih tak terkira,
sakit tak membekas,

obat hati hanya cinta,

namun hanya sesaat..

Laksana candu, memabukkan,

terasa mengobati, namun kian membunuh,

perlahan tapi pasti..

Semakin aku menyayangimu,

semakin aku harus melepasmu..

Tak ingin luka lama terbuka kembali,

borok lama membekas kembali..




Mataram,
5 maret 2009

Symphony of love #8

Come and see me
look inside deep to my eyes..
I could realize whatever u wish..
I could understand inside u'r mind..
A special give from my heart..
Then u told me to keep it in my heart
cause u have another..
Make me hurt..
But i belive..
there's love for me another day..
Not today..
I love u..
Always love u..


Mataram,
february 24th 2009

Symphony of love #7

I know u,
more then u know u're self,
i love u,
much then u want,
coz a little flower blooming..
Then look at the sky,
when sun standing in the bottom of the sky,
wanna go out, wanna keep stay..
Finding me on the yellow shine,
close enough, but far far away,
waiting me..
To say i love u,
nothing loose..
Even love has far far away from u,
i just looking for u'r self..
Coz i love u..

Dusty morning,
mataram, february 27th 2009

symphony of love #6

Andaikan mentari telah redup akan cahayanya,,
menanti sentuhan rembulan senja,,
dalam kesunyiann menatap malam,,
setiap wajah berpaling akan dirinya,,
setelah semua cahaya membasahi sekujur tubuh malang ini..
dan diriku hanya terdiam,,
dikala cahaya jingga menghiasi cakrawala,,
dalam tanya di dalam dada,,
akankah dirinya kembali,,
menyinariku dengan segenap kasih,,
aku takut malam akan selamanya,,
menelan kebahagian dalam kegelapan,,
hingga tak kuasa mata ini untuk menutup dirinya,,
kegalauan yang kian menyiksa,,
rintihan kegelisahan,,
memecah kesunyian malam,,
dalam perihnya luka di hati,,
aku menanti,,
hingga akhirnya mentari menjemputku,,
dengan sinar keemasan yang tampak asing bagiku,,
inikah yang kucari,,
cahaya inikah yang kuharapkan,,
kuharap cahaya ini mendekapku dalam kasih sekali lagi,,
meski ku tau, ia menyayangiku,,
namun keraguan kembali menghantuiku,,
semoga cahaya itu tak rudup,,
walau ku tau itu sebuah harapan bodoh,,
karna cepat atau lambat,,
ia akan redup dan kembali menghilang,,
namun kuingin cahaya ini menjadi lebih indah,,
semakin indah dengan datangnya pelagi,,


pelangi cinta...

Sebuah renungan..

Taon baruan,,
apa yg gak menyenangkan. ketemu temen, jalan bareng orang yg kita sayang, ato skedar kumpul bareng kluarga..
Mungkin semua terlihat menyenangkan, menggembirakan. Tapi coba kita liat sodara kita di palestina sana,,
Mereka harus menderita, mereka terjajah. Tanah mereka dirampas, mereka dizolimi.
Adik-adik kecil kita kehilangan ayahnya, Ibu-ibu harus kehilangn anak-anak mereka.

Dunia akan lehih indah kalau kita mau membagi sdikit cinta kita kpada sesama.
Hanya untuk renungan bagi kita..

  • support our brother..

    support our brother..

    ShoutMix chat widget