Benarkah PERSAHABATAN dua kali lebih kuat daripada CINTA ...???

Benarkah PERSAHABATAN dua kali lebih kuat daripada CINTA ...???

Saat AQU mendapatkan pertanyaan itu AQU tak dapat menjawabnya secara langsung coz itu semua secara empiris belum terbukti akan kebenarannya. Kemudian setelah AQU utak-utik secara sistematis dengan Ilmu Matematika-Q ternyata emang benar bahwa PERSAHABATAN emang memiliki kekuatan dua kali lipat lebih besar daripada CINTA.

Bukti :

Jika : A = 1 , B = 2, C = 3, D = 4, dst….

Maka dapat dibuktikan :

       LOVE = L+O+V+E = 12+15+22+5 = 54

       FRIENDSHIP = F+R+I+E+N+D+S+H+I+P = 6+18+9+5+14++4+19+8+9+16 = 108

                 

>>>        2 x LOVE = 2 x 54 = 108 ……(Terbukti)

Dengan Matematika Kita Juga Bisa Bijak

Ketika GRAFIK FUNGSI tak mampu menggambarkan isi hati...
Ketika PERBANDINGAN tak lagi mampu memilih...
Ketika PELUANG tak lagi memberi kesempatan...
Dan ketika DIMENSI tak mampu lagi memberi RUANG...
Hanya TEOREMA-lah yang mampu menuntun kita hingga tak terjebak dalam LINGKARAN kehidupan yang tak berujung.




Hidup bagaikan LINGKARAN yang tak punya ujung, tapi memiliki SATU TITIK PUSAT yang merupakan penentu BESAR dan KECIL-nya kesadaran yang ada dalam diri.
Namun terkadang hidup juga bagaikan GRAFIK FUNGSI yang tak mempunyai jati diri dan komitmen, mudah berubah karena pengaruh ABSIS dan ORDINAT.
Semoga kita bisa jadi PERSAMAAN GARIS LURUS yang tak mungkin terbengkokkan meski ada KOEFISIEN negatif yang menghadang.




Mungkin dg RUMUS FUNGSI qta bs mengetahui nilai suatu VARIABEL,
nmun tak 'kn bs mengtahui karakter se2org yg sebenarnya.
Dan mungkin dg PERSAMAAN qta bs mengetahui kebenarn suatu nilai,
nmun tak 'kn bs mengtahui siasat buruk se2org dibelakang qta.
Hanya dg Realistic Mathematics Education-lah qta bs mengetahui siapa yg mnjdi anggota HIMPUNAN kawan sejati qta & siapa yg mnjdi INVERS yg memasang duri dlm perjuangan qta.

PUISI CINTA

Rindu (Belum Kasip)

Rinai rintik hujan pertegas jarak rinduku
Berlari dengan langkah-langkah kecil

Ada decak ... ada ragu ...
Ada gontai dari langkah kecil yang tak tentu
Mengejar hembusan nafas harum nan lembutmu

Dan kala dendam rindu ini datang mendera
Bayangmu sesaat memaku segala gerakku
Mengalihkan mataku pada indah sudut matamu
Yang menampakkan butiran-butiran kasih sayang

Rinduku ...
Bersangkar dalam hati yang tamaram
Di pagar waktu di jaga malam
Melagukan merdunya kepedihan
Bagian terindah dari kebahagiaan yang kita punya

Di sini ... di jarak waktu ini
Aku menjadi pedih !
Mencari cahaya yang telungkup di balik bukit
Memutuskan satu nadi waktu
Menanti jiwamu yang tak ragu ...

Belum kasip rinduku ... hanya untukmu

Aku Mencintaimu

Mencintai adalah masalah yang penting bagi manusia
Bila kita mampu mengurai cinta,
Maka hakekat cinta akan berubah menjadi sesuatu
Itulah kenyataan cinta ...

Memperlihatkan cinta adalah suatu kepicikan
Dibanding sesuatu yang agung, yang tersembunyi dibalik cinta
Cinta memang tidak mudah untuk dimengerti ...

Seseorang selalu membutuhkan orang lain
Untuk membantu memahami bagian dari diri kita.
Untuk menyingkap bagian yang tersembunyi dari diri mereka.
Dan untuk percaya dan memahami bagian yang terbaik dari mereka

Ketika kita membantu orang lain.
Kita tidak boleh menyembunyikan apa yang kita ketahui tentangnya
Kita tidak boleh hanya menjadi telinga bagi mereka.

Ketika tangan kehidupan terasa gelap dan malam tak bernyanyi
Itu adalah waktu untuk cinta dan kepercayaan
Dan tangan kehidupan akan bersinar dan bernyanyi
Bila seseorang mencintai dan mempercayai seutuhnya.

Kasih ... kekuatan apakah yang menggerakkanku dalam badai
Mengapa aku menjadi lebih baik dan lebih kuat
Serta lebih yakin pada kehidupan saat badai menerjang
Aku tak mengerti dan sekarang aku menjadi lebih mencintai dirimu
Dari apapun yang ada di alam ini.

Sejak pertama kulihat engkau,
Hal yang paling mendalam yang kurasakan adalah
Kejujuran, kecerdasan dan kehangatan dirimu.
Kini, pun sama hanya seribu kali lebih dalam dan lebih lembut.

Aku mencintaimu sebelum kita berdekatan,
Sejak pertama kulihat engkau.
Aku tahu ini adalah takdir.
Kita akan selalu bersama ...
Dan tidak ada yang akan memisahkan kita

Amien …………

Dari Jauh

Dari jauh, aku memandangmu
Lewat semua mata hatiku

Dari jauh, aku mengagumimu
Lewat semua kisah tentangmu

Dari jauh, aku mengkhayalkanmu
Tanpa peduli kata hatiku

Dari jauh, aku larut dalam suka citamu
Bagai bertemu air jernih dipadang tandus

Dari jauh, aku hanyut dalam dukamu
Bagi tersesat dalam mimpi buruk

Dari jauh, kukirim do'a untukmu
Do'a tulus, do'a tak bersyarat

Dari jauh, kulukis engkau dalam tidurku
Lewat beragam bunga tidurku

Dari jauh, aku titipkan hatiku padamu
Agar kau senantiasa setia padaku

Dalam Sepi

Disaat kusendiri
Teringat dirimu yang jauh disana
Apa kabarmu ?

Terbayang candamu
Yang selalu membuatku bahagia
Tiada rasa duka

Kasih percayalah
Cinta dan sayangku hanya untukmu
Walau jarak telah memisahkan kita
'Tak perlu engkau resah
Yakinlah ...
Kita akan bersama selamanya ...

Harapku Tuhanku

Beri dia yang kucinta
Hati yang tabah
Agar selalu tegak berdiri
Menantang kerasnya hidup
Dan tolong bimbing dia
Selagi dia lupa
Karena jauh dan sepi

Amien ....

Keyakinan Cinta

Dekaplah sayangku dan pejamkan matamu
Izinkalah kukecup bibirmu
Yang indah dan mempesona

Lepaskan rindumu yang tersimpan dihatimu
Biarkan hasrat cinta kita
Bersatu 'tuk selamanya

Janganlah kau ragu akan cintaku
Yakinlah diriku milikmu selalu.

Rindu

Saat kutapaki jalan itu
Seakan kusadari ada dirimu
Berjalan disampingku, Bisu ...

Saat kutatap langit biru
Kubayangkan angan dan mimpiku
Untuk selalu bertemu denganmu

Saat kudengar sebuah lagu
Kuinginkan nada dan irama musikmu
Kau dendangkan hanya untukku

Saat kumasuki tidur malamku
Kumimpikan kau dan aku menyatu
Lalu ingin kukatakan ;
Kasih ... Aku Rindu ...

Pesan Buatmu Kekasih

Di sini telah ku tulis
Berjuta-juta kesaksian
Tentang kita dan sketsa perjalanan
Namun cerita selalu tak pernah sempurna
Karena jarak terlalu jauh
'Tuk di tempuh oleh anganan kita

Dan angananku telah kutitipkan padamu
Agar rindu itu 'kan menyatu
Dalam kenyataan dan bukan khayalan
Serta angananku belaka

Nurani didinding hati hampir retak
Dekaplah aku yang erat
Agar kita tak terpisahkan
Hanya karena khayalan dan anganan

Adakah Kau Rasakan

Setiap mataku terpana padamu
Saat itu pula rasaku 'tak menentu

Detak nadiku ...
Goncangan dadaku ...
Menghanyutkan ketenangan kalbuku

Kadang kusentak diriku
Kutarik pandangan yang terpaku

Kusadarkan jiwaku yang menggebu
Dan kukurung dalam terali hatiku

Karena bimbang dan ragu
Seribu tanya yang masih menghalau
Adakah kau seperti aku ... ?

Cintaku Jauh Disana


Cintaku jauh disana
Gadis manis, sekarang lagi sendiri
Kini hari berlalu perlahan tanpamu disisi
Rambutnya yang panjang, yang pernah kubelai
Matanya yang indah, menusuk sepi
Kini wajah manisnya membelit rinduku
Rindu itu bagaikan bayangan
Wajah – wajah, tiba – tiba menyapa dalam diam
Lalu akupun menjadi semakin rindu

dihati kutulis kerinduanku
tentang kesetiaan dan ketulusan
tentang kesabaran dan pengharapan

milik cinta yang lembut dan setia
tak usah pendamkan rasa
dalam mencari saat bahagia

kalau sampai waktuku nanti
aku pasti kembali
untuk mempertanyakan lagi cintamu

bukan untukmu, bukan untuk siapa - siapa
tapi untuk diriku sendiri
karena aku sayang kamu

Mutiara Cinta

Ketika hati diketuk
Lidah kelu tidak menjawab
Hanya Hati yang bicara
Aku Jatuh Cinta padamu
Aku tahu
Hatiku selalu jujur
Ketika aku mendengarkan suaranya
Dan Kupejamkan mataku

Letih

kadang ku ingin menangis….
aku ingin berlari….
tinggalkn semua….
tinggalkan semua belenggu yang ad di hati ne….
sesak d hati ne…
tak bisa bernafas menghirup udara….
ku letih dengan semua ne….
ke jenuh dengan hidup ne…
aku harus bagaimana?
aku harus seperti apa?
aku harus dimana?
untukku sandarkan rasa letih dan jenuh ne….

 

Puisi Cinta Mutiara Hati

Rasa sayang tanpa balas
Menguji kesungguhan hati
Menggali Kebenaran Nurani
Apakah ada cinta yang sejati
Tak ada yang tahu
kapan Kutau
bila itu memang ada
Dan selamanya tetap ada
Jauh di dasar hati
Terkadang Hati memerih
Dan dia bertanya
Haruskah aku menderita karena cinta?
Mengapa aku harus bertanya
Kalau Cinta tak pernah menyakitiku
Cintaku membuat aku bahagia
Karena Engkau Bahagia

PASCAL "Menbuat Program Utama"

Membuat Program Utama

Procedure tambah (x,y:integer;var hasil:integer);

begin

     hasil:=x+y;

end;

Procedure kali (a,b:integer;var c:integer);

begin

     c:=a*b;

end;

Procedure bagi (c,d:real;var e:real);

begin

     e:=c/d;

end;

Procedure kurang (p,q:integer;var r:integer);

begin

     r:=p-q;

end;

{Program utama}

var

   a,b,p,q,z:integer;

   k :real;

begin

   gotoXY(15,10);

   write('Tuliskan bilangan pertama:');

   read(a);

   gotoXY(15,12);

   write('Tuliskan bilangan kedua:');

   read(b);

   kali(a,b,z);

   tambah(a,b,p);

   bagi(a,b,k);

   kurang(a,b,q);

   gotoXY(15,14);

   writeln('hasil kali',a,'dan',b,'=',z);

   gotoXY(15,15);

   writeln('hasil penjumlahanya=',p);

   writeln('hasil bagi',a,'dan',b,'=',k:3:0);

   gotoXY(15,16);

   writeln('selisih keduanya=',q);

end.

PASCAL "Persamaan Kuadrat"

PASCAL “ Persamaan Kuadrat”

Program persamaan_kuadrat;

uses WinCrt;

var a,b,c: integer;

    d, x1, x2:real

begin

     clrscr;

     write('masukkan koefisien persamaan kuadrat:');

     readln (a,b,c);

     writeln('persamaan kuadrat:',a,'x^2+',b,'x+',c);

     if a=01 then write ('ini bukan persamaan kuadrat')

else

begin

     d:=(b*b)-4*a*c;

     if d>0 then

begin

     writeln('persamaan kuadrat ini memiliki akar yang berbeda');

     x1:=(-b+sqrt(d))/(2*a);

     x2:=(-b-sqrt(d))/(2*a);

     writeln('akar-akarnya:',x1:3:2,' dan ',x2:3:2);

end

else if d=0 then

begin

     writeln('punya akar kembar');

     x1:=-b/(2*a);

     writeln('akar-akarnya:',x1:3:2);

end

else

    writeln('persamaan kuadrat anda berakar kompleks');

end;

end.

PASCAL "Konversi Suhu"

PASCAL “ Konversi Suhu”

{Progam KonversiSuhu}

uses Wincrt;

var InpSuhu           :real;{C=Celcius, R=Reamur, F=Farhenheit, K=Kelvin}

OutC, OutR, OutF, OutK:real;

jenisSuhu              :char;

InpSuhuString          :string; {var penampung input suhu dalam string}

tempSuhu               :real; {var sementarauntuk konver string ke real}

ErrCode                :integer;{var untuk penampung error saat konversi string ke real}

   label 100,200;

{progam utama}

begin

     {menu}

     100:{label 100}

     write ('Masukkan jenis suhu C/R/F/K: ');

     readln(JenisSuhu);

     JenisSuhu:=upcase(JenisSuhu);{mengubah jenis suhu ke upper case}

          if (JenisSuhu <> 'C') then

          if (JenisSuhu <> 'R') then

          if (JenisSuhu <> 'F') then

          if (JenisSuhu <> 'K') then

                begin;

                    writeln ('Jenis Suhu salah, silahkan ulangi!');

                    writeln;

                    goto 100

                end;

     200:{label 200}

     write ('Masukkan besar suhu :');

     readln(InpSuhuString);

     val(InpSuhuString,inpSuhu,Errcode);

         if Errcode<>0 then

         begin;

         writeln('Data suhu yang dimasukkan tidak valid, masukkan data numerik!');

         writeln;

         goto 200;

              end;

     writeln; {hitung konversi suhu}

     writeln('Hasil Konversi suhu, Untuk Suhu',inpSuhu:6:2,' ',JenisSuhu);

     writeln('....................................');

         if(JenisSuhu='C') then {jika input suhu dalam celcius}

                begin;

                     OutR:=inpSuhu * 4/5;

                     OutF:=(InpSuhu *9/5) + 32;

                     OutK:=InpSuhu + 273;

                     writeln('Suhu dalam Reamur         =',OutR:6:2);

                     writeln('Suhu dalam Fahrenheit     =',OutF:6:2);

                     writeln('Suhu dalam Kelvin         =',OutK:6:2);

                end;

         if (JenisSuhu = 'R') then {jika input suhu dalam reamur}

                begin;

                      OutC:=InpSuhu * 5/4;                                                  

                      OutF:=(InpSuhu * 9/4) + 32;

                      OutK:=(InpSuhu * 5/4) + 273;

                      writeln('Suhu dalam Celcius       =',OutC:6:2);

                      writeln('Suhu dalam Fahrenheit    =',OutF:6:2);

                      writeln('Suhu dalam Kelvin        =',OutK:6:2);

                end;

        if (JenisSuhu ='F') then {Jika input suhu dalam fahrenheit}

                begin;

                      OutC:=InpSuhu * 5/9;

                      OutR:=(InpSuhu * 4/9) + 32;

                      OutK:=(InpSuhu * 5/9) + 273;

                      writeln('Suhu dalam Celcius       =',OutC:6:2);

                      writeln('Suhu dalam Reamur        =',OutR:6:2);

                      writeln('Suhu dalam Kelvin        =',OutK:6:2);

                end;

        if(JenisSuhu= 'K') then {Jika input suhu dalam kelvin}

                begin;

                      OutC:=InpSuhu - 273;

                      OutR:=(InpSuhu - 273) * 4/5;

                      OutF:=((InpSuhu - 2730) * 9/5) + 32;

                      writeln('Suhu dalam Celcius    =',OutC:6:2);

                      writeln('Suhu dalam Reamur     =',OutR:6:2);

                      writeln('Suhu dalam Fahrenheit =',OutK:6:2);

                end;

                    readln;

     end.{end program}