program faktorial_pascal;
uses wincrt;
function faktorial (a:integer) : longint;
begin
if (A=1) then
faktorial:=1
else
faktorial:=a*faktorial(a-1);
end;
var x:integer;
begin
clrscr;
writeln('faktorial sequence');
writeln;
write('berapa faktorial : ');readln(x);
writeln(x,' faktorial ','= ',faktorial(x));writeln;
write('tekan sembarang tombol untuk keluar...');
readln;
end.
Minggu, 09 Februari 2014
Diposting oleh
Unknown
di
23.10
Diposting oleh
Unknown
di
23.09
uses wincrt;
var x,y,z,s:integer;
function fungsi(a,b,c,x:integer):integer;
begin
fungsi:=a*(x*x)-b*x+c;
end;
begin
write('masukan a :');readln(x);
write('masukan b :');readln(y);
write('masukan c :');readln(z);
write('masukan x :');readln(s);
writeln('f(x)=',x,'(x^',x,'2)-',y,'x+',z);
writeln('f(',s,')=',fungsi(x,y,z,s));
readln;
end.
Kamis, 21 November 2013
Diposting oleh
Unknown
di
21.48
Edelweis (kadang ditulis eidelweis) atau Edelweis Jawa (Javanese edelweiss) juga dikenal sebagai Bunga Abadi yang mempunyai nama latin Anaphalis javanica, adalah tumbuhan endemik zona alpina/montana di berbagai pegunungan tinggi Indonesia. Tumbuhan ini dapat mencapai ketinggian maksimal 8 m dengan batang mencapai sebesar kaki manusia walaupun umumnya tidak melebihi 1 m.
Di balik keindahan dari bunga edelweis ternyata tersimpan sebuah mitos, dimana bagi yang memberikan bunga ini kepada pasangannya, maka cintanya akan abadi. Tidak sedikit para pencinta yang menjadikan bunga abadi ini menjadi salah satu hadiah spesial bagi pasangannya. Konon, hal itu dimaksudkan agar cintanya abadi.
Mmm.., kalau bicara mengenai mitos memang susah, meskipun terkadang itu tidak masuk akal. Tapi di lain sisi, ketika posisi kita telah menjadi korbannya, justru sebaliknya, “Mitos mampu mengalahkan sebuah logika dan keyakinan”. Nggak percaya? Coba deh tanyain ke teman-teman kamu mengenai hal ini. Atau mungkin diantara kamu memiliki cerita tersendiri mengenai mitos ini.
Siapa yang nggak tahu bunga edelweis, atau banyak orang yang memberikan istilah dengan bunga abadi. Kalau dilihat dari bentuknya bunga ini sangat cantik, dan di balik kecantikannya itu tersimpan makna ataupun mitos yang cukup banyak mempercayainya. Butuh perjuangan untuk mendapatkannya, karena bunga yang satu ini biasanya tumbuh di puncak-puncak atau lereng-lereng gunung.
Oleh karena itu kamu bisa membayangkan betapa susahnya untuk bisa memetik si bunga abadi ini. Orang bilang, “Untuk mendapatkan bunga edelweis yang indah, maka semakin besar resiko yang dihadapi”, karena nyawa adalah tantangannya. Mengingat bahwa bunga edelweis telah menjadi bunga yang langka dan dilindungi, razia juga salah satu resiko yang harus ditanggung.
Tapi.., fenomena yang ada sekarang ini justru mengharuskan kita agar dapat bijaksana dan membuat benang merah agar bunga edelweis tetap ada sebagai pelepas dahaga jika seandainya suatu saat kita berdiri di sebuah puncak yang tinggi, dimana sekeliling kita adalah hamparan bunga abadi ini. Save Edelweis!
So, kalau pacar kamu bertanya, “Kenapa kamu (tiba-tiba) nggak suka bunga edelweis? Bukankah itu bunga abadi yang bisa membuat cinta kita abadi seperti bunga edelweis?”. Cari alasan lain aja deh, yaa.. mungkin kamu bisa bilang, “Bunga itu terlalu indah untukku..”, “Aku gak tega melihatnya, karena hanya bunga ini puncak dan lembah di pegunungan menjadi indah..”, atau, “Cinta kita akan lebih indah dan abadi jika kamu memberikan bunga bank..”. Bagi yang percaya bahwa bunga edelweis bisa membuat cinta kamu abadi, akan lebih bijaksana kalau kamu justru membiarkan bunga itu tumbuh dan abadi sesuai pada tempatnya.
Kamu tidak akan pernah mendapatkan cinta abadi (dari sekuntum bunga abadi), tapi adalah cinta sejati (juga bukan dari sekuntum bunga Edelweis). Dan kamu justru tidak akan mendapatkan keduanya jika kamu tidak meyakini bahwa yang sedang kamu rasakan
Bunga Edelweis (Keabadian)
Edelweis (kadang ditulis eidelweis) atau Edelweis Jawa (Javanese edelweiss) juga dikenal sebagai Bunga Abadi yang mempunyai nama latin Anaphalis javanica, adalah tumbuhan endemik zona alpina/montana di berbagai pegunungan tinggi Indonesia. Tumbuhan ini dapat mencapai ketinggian maksimal 8 m dengan batang mencapai sebesar kaki manusia walaupun umumnya tidak melebihi 1 m.
Di balik keindahan dari bunga edelweis ternyata tersimpan sebuah mitos, dimana bagi yang memberikan bunga ini kepada pasangannya, maka cintanya akan abadi. Tidak sedikit para pencinta yang menjadikan bunga abadi ini menjadi salah satu hadiah spesial bagi pasangannya. Konon, hal itu dimaksudkan agar cintanya abadi.
Mmm.., kalau bicara mengenai mitos memang susah, meskipun terkadang itu tidak masuk akal. Tapi di lain sisi, ketika posisi kita telah menjadi korbannya, justru sebaliknya, “Mitos mampu mengalahkan sebuah logika dan keyakinan”. Nggak percaya? Coba deh tanyain ke teman-teman kamu mengenai hal ini. Atau mungkin diantara kamu memiliki cerita tersendiri mengenai mitos ini.
Siapa yang nggak tahu bunga edelweis, atau banyak orang yang memberikan istilah dengan bunga abadi. Kalau dilihat dari bentuknya bunga ini sangat cantik, dan di balik kecantikannya itu tersimpan makna ataupun mitos yang cukup banyak mempercayainya. Butuh perjuangan untuk mendapatkannya, karena bunga yang satu ini biasanya tumbuh di puncak-puncak atau lereng-lereng gunung.
Oleh karena itu kamu bisa membayangkan betapa susahnya untuk bisa memetik si bunga abadi ini. Orang bilang, “Untuk mendapatkan bunga edelweis yang indah, maka semakin besar resiko yang dihadapi”, karena nyawa adalah tantangannya. Mengingat bahwa bunga edelweis telah menjadi bunga yang langka dan dilindungi, razia juga salah satu resiko yang harus ditanggung.
Tapi.., fenomena yang ada sekarang ini justru mengharuskan kita agar dapat bijaksana dan membuat benang merah agar bunga edelweis tetap ada sebagai pelepas dahaga jika seandainya suatu saat kita berdiri di sebuah puncak yang tinggi, dimana sekeliling kita adalah hamparan bunga abadi ini. Save Edelweis!
So, kalau pacar kamu bertanya, “Kenapa kamu (tiba-tiba) nggak suka bunga edelweis? Bukankah itu bunga abadi yang bisa membuat cinta kita abadi seperti bunga edelweis?”. Cari alasan lain aja deh, yaa.. mungkin kamu bisa bilang, “Bunga itu terlalu indah untukku..”, “Aku gak tega melihatnya, karena hanya bunga ini puncak dan lembah di pegunungan menjadi indah..”, atau, “Cinta kita akan lebih indah dan abadi jika kamu memberikan bunga bank..”. Bagi yang percaya bahwa bunga edelweis bisa membuat cinta kamu abadi, akan lebih bijaksana kalau kamu justru membiarkan bunga itu tumbuh dan abadi sesuai pada tempatnya.
Kamu tidak akan pernah mendapatkan cinta abadi (dari sekuntum bunga abadi), tapi adalah cinta sejati (juga bukan dari sekuntum bunga Edelweis). Dan kamu justru tidak akan mendapatkan keduanya jika kamu tidak meyakini bahwa yang sedang kamu rasakan
Diposting oleh
Unknown
di
21.00
Raden Ajeng Kartini
Raden Adjeng Kartini, lahir di
Jepara Jawa Tengah tanggal 21 April 1879. Atau lebih tepatnya ia dipanggil
dengan nama Raden Ayu Kartini, karena pada dasarnya gelar Raden Adjeng hanya
berlaku ketika belum menikah, sedangkan Raden Ayu adalah gelar untuk wanita
bangsawan yang menikah dengan pria bangsawan dari keturunan generasi kedua
hingga ke delapan dari seorang raja Jawa yang pernah memerintah. Kartini
sendiri menikah dengan bupati Rembang, K.R.M. Adipati Ario Singgih Djojo Adhiningrat pada tanggal
12 November 1903 yang telah
mempunyai tiga istri. Dari pernikahannya tersebut ia dikaruniahi seorang anak
perempuan bernama Soesalit Djojoadhiningrat yang lahir pada tanggal 13
September 1904.
R.A. Kartini lahir dari pasangan Raden Mas Adipati Ario Sosroningrat yakni bupati Jepara dengan M.A.
Ngasirah. Kartini adalah anak ke-5 dari 11 bersaudara kandung dan tiri. Dan dari
kesemua saudara sekandung, Kartini adalah anak perempuan tertua.
Oleh karena orang tuanya termasuk
orang penting dalam pemerintahan, Kartini sempat diberikan kebebasan untuk
mengenyam pendidikan yang lebih dibandingkan perempuan lainnya. Ia bersekolah
di ELS (Europese Lagere School) walaupun hanya sampai berumur 12
tahun. Disanalah antara lain Kartini belajar bahasa Belanda.
Dengan keterampilannya berbahasa
Belanda, Kartini mulai belajar sendiri dan menulis surat kepada teman-temannya
yang berasal dari Belanda. Disitulah ia mencurahkan segala unek-uneknya tentang ketidakadilan yang dirasakannya akan beberapa hal yang ia
anggap memojokkan wanita pada waktu itu.
17 September 1904, Kartini menghembuskan nafas terakhirnya pada
usia 25 tahun. Kartini dimakamkan di Desa Bulu, Kecamatan Bulu, Rembang.
Jumat, 11 Oktober 2013
Diposting oleh
Unknown
di
23.05
Puisi Persahabatan
Karya : Zulfa Asyifa R
Sahabat
Saat
hatiku tergores luka yang mendalam kau obati lukaku hingga sembuh
Saat
ku menanggis kau tuntun aku ke tempat paling indah sepanjang hidupku
Kau
ajak aku meraih berjuta kebahagiaan dalam hatiku
Kau
bawa sedihku menjadi bahagia kau bawa air mata ku menjadi senyuman yang indah
Kasih
saying mu terus mengalir seperti air yang tak akan ada habisnya
Andai
ku punya sayap kan ku bawa kau terbang
ke angkasa
Kuajak
kau menari di kegelapan langit yang telah tersinari cahaya bulan
Ingin
ku petik sebuah bintang terindah untukmu
Hingga
suatu masa alam akan bercerita dengan bahasanya kebersamaan, ketulusan, kesetiaan
semua berbaur menjadi satu berukirkan PERSAHABATAN
Diposting oleh
Unknown
di
22.55
Wahai
malam
Ingin
aku tetap terjaga agar bisa ku tatap lekat wajah yang terlukis oleh imajinasiku
Seandainya
siang telah menamparku, ku ingin kau merengkuh jiwaku yang rapuh ini
Wahai
embun pagi
Sejukmu
merasuk mengguyur hati yang gersang ini
Dan
senyuman surya yang menyapa hati yang pilu ini
Angin
Ke
mana aku harus pergi untuk menemui kekasih hati
Debu
Terbanglah
engkau dan sampaikan salam rinduku padanya
Apakah
dia telah melupakan aku?
Tuhan
Aku
bagaikan daun yang gugur
Yang
tak tau arah ku terbang
Mernatap
sayu wajah manusia yang seolah ingin meminta tolong untuk menyatukanku dengan
dahan meski ku tak mlayak lagi untuk mu
Subscribe to:
Postingan (Atom)




