Kamis, 11 Oktober 2012

krennnn krennnnnnnnnnnn



MUSE-UNINTENDED
You could be my unintended
Kau bisa menjadi calon isteriku
Choice to live my life extended
Terpilih untuk membuat hidupku lebih lama
You could be the one I’ll always love
Kau satu-satunya yang selalu kucintai

You could be the one who listens
Kau satu-satunya yang setia mendengarkan
to my deepest inquisitions
Keingintahuan ku yang terdalam
You could be the one I’ll always love
Kau satu-satunya yang selalu kucintai

I’ll be there as soon as I can
Aku akan melakukannya secepat yang ku bisa
But I’m busy mending broken pieces of the life I had before
Tapi aku sibuk menata potongan hidupku yang hancur sebelumnya

First there was the one who challenged
Sebelumnya, ada seseorang yang bisa mengalahkan
All my dreams and all my balance
Semua mimpiku dan semua keseimbanganku
She could never be as good as you
Dia tak pernah sesempurna dirimu

You could be my unintended
Kau bisa menjadi calon istriku
Choice to live my life extended
Terpilih untuk membuat hidupku lebih lama
You should be the one I’ll always love
Kau satu-satunya yang selalu kucintai

I’ll be there as soon as I can
Aku akan melakukannya secepat aku bisa
But I’m busy mending broken pieces of the life I had before
Tapi aku sibuk menata potongan hidupku yang hancur sebelumnya
Before youuu....
Sebelum kamu...



nah diatas adlah arti /makna dari lagu tersebut,kalau sebab alasan matthew bellamy menciptakan lagu unintended,berikut alasannya:

Lirik ini adalah berisi tentang “penolakan secara halus seorang cowok kepada seorang cewek lain(cewek ke-2), karena si cowok sudah memiliki cewek pertama yg menjadi kekasihnya…”

Lirik ini asal mulanya ditulis oleh Matt Bellamy (Vokalis/Gitaris Muse) setelah dia menerima telepon dr seorang cewek yg tdk dikenalnya. Oleh sebab itu, si “penelpon gelap” tadi mndapat sebutan/julukan “Unintended” yg artinya “tidak diundang/tidak diharapkan” oleh si Matt, dengan harapan bahwa si Matt tdk terjebak oleh perasaannya sendiri terhadp si cewek yg menelponnya tadi…

Dengan kata lain, si cowok tidak ingin terjebak perasaan cintanya dgn cewek B. Krn si cowok masih menjalin hubungan dgn cewek A, meskipun cewek B menawarkan sesuatu yg “lebih” dibanding cewek A. Tetapi, bagaimanapun juga si cowok tetap bertahan dgn cewek A. Karena kekurangan cewek A merupakan tantangan yg harus di penuhi/di perbaiki oleh si cowok dalam menjalani suatu hubungan….

Demikian kisahnya,tapi lagu ini menurut gue sesuai dalam kondisi apapun mau sedang patah hati ataupun sedang jatuh cinta,karena lagu ini very-very touching and easy listening.

Semoga Bermanfaat,buat para muser maupun pecinta musik...

Rabu, 10 Oktober 2012

program hadiah


program hadiah;
uses crt;
var pembelanjaan:real;
var barang : integer;
begin
     clrscr;
     write('masukan jumlah pembelanjaan:');
     read(pembelanjaan);
     write('masukkan jumlah barang:');
     read(barang);
      if(pembelanjaan>=200000) and (barang=10) then
      begin
        write('selamat anda mendapatkan hadiah kompor gas');
      end
      else
      if (pembelanjaan>150000) and (pembelanjaan<200000) and (barang=8) then
      begin
        write('selamat mendapatkan hadiah kipas angin');
      end
      else
      if (pembelanjaan>100000) and (pembelanjaan<150000) and (barang=6) then
        write('selamat anda mendapatkan hadiah payung');
        readln;
        readln;
end.

Selasa, 09 Oktober 2012

anak-anak suntalangu style



menghitung diskon bahsa pascal


program discount;
uses crt;
var harga,diskon,total:real;
begin
     clrscr;
     write('masukkan harga:');
     read(harga);
     if harga>=1000000 then
      begin
          writeln('diskon 15%');
           diskon:=harga*15/100;
            total :=harga-diskon;
             writeln(total:2:2);
     end
     else
     if (harga<1000000) and (harga>500000) then
      begin
          writeln('diskon 10%');
           diskon:=harga*10/100;
            total:=harga-diskon;
             writeln(total:2:2);
     end
     else
     if (harga<500000) and (harga>100000) then
      begin
          writeln('diskon 5%');
           diskon:=harga*5/100;
            total:=harga-diskon;
             writeln(total:2:2)
     end
     else
     if (harga>100000) and (harga<50000) then
     begin
          writeln('diskon 5%');
          diskon:=harga*5/100;
          total:=harga-diskon;
          writeln(total:2:2);
     end
     else
     if harga<500000 then
     writeln('tidak dapat diskon');
     readln;
     readln;

end.

BELAJAR PASCAL


program diskon;
uses crt;
var a, b, c  : real;
begin
clrscr;
writeln (' Masukkan Harga: ');
readln (a);
if a >= 50000 then
begin
b:=50000*10/100;
c:=50000-b;
writeln ('Rp ', c:2:2);
end
else
if a = 50000 then
begin
b:=a*5/100;
c:=a-b;
writeln ('Rp ', c:2:2);
end
else
if a >= 10000 then
begin
b:=50000*5/100;
c:=50000-b;
writeln ('Rp ', c:2:2)
end
else
if a <= 10000 then
begin
writeln ('Tidak mendapat diskon');
end;
readln;
end.

Minggu, 07 Oktober 2012

bahasa pascal 01


program program1_penjumlahan_dua_bilangan;
uses crt;
     var a,b,c:integer;

     begin
          clrscr;
          a:=0;
          b:=0;
          c:=0;

          a:=5;
          b:=10;

          write('masukkan nilai a :');readln(a);
          write('masukkan nilai b :');readln(b);

          c:=a+b;

          writeln('nilai adalah:',a);
          writeln('nilai adalah:',b);
          writeln('nilai adalah:',c);
          readln;
          end.