80 Hari Keliling Dunia by Jules Verne
My rating: 4 of 5 stars

Setelah lama masuk daftar buku yang mau dibaca... baru mulai dibaca maret 2011...keterlaluan banget yach..
Penasaran seperti apa sih keliling dunia hanya dalam waktu 80 hari? Ternyata ini tantangan pertaruhan antara Fogg dan teman-teman seklubnya. Fogg yang sangat efisien, disiplin, tepat waktu, selalu yakin dengan ketepatan waktunya dan cool abis sangat percaya bahwa dia dapat mengelilingi dunia hanya dalam 80 hari walaupun dia juga menyadari beberapa masalah mungkin saja terjadi dalam perjalanan tersebut yang dapat menyebabkan dia kalah taruhan... seruu bagaimana dia harus menepati setiap waktu yang mesti dia tempuh. Tapi sepertinya dia sendiri tidak menikmati perjalanannya.. gimana mau menikmati perjalanannya kalau setiap waktu dia hanya duduk main kartu di dalam kereta api, di kapal...dll. Yang menikmati perjalanan justru pelayannya... Fogg mulai terlibat secara langsung dengan perjalannnya setelah timbul banyak masalah di India, dan Amerika....


View all my reviews

Habibie & Ainun by Bacharuddin Jusuf Habibie
My rating: 4 of 5 stars

Dari halaman pertama sampai dengan terakhir tergambar jelas rasa cinta Habibie kepada Ainun terutama pada ungkapan kata yang merindukan tatapan sejuk mata Ainun yang mampu memberikan semangat baru bagi jiwa Habibie dalam mengemban tugas-tugas dan mendampingi hidupnya...


View all my reviews

Where Are the Children? - Dimana Anak-anakku? by Mary Higgins Clark
My rating: 5 of 5 stars

Mencekam, sejak awal cerita ini sudah berhasil menghadirkan rasa mencekam, terkadang ngeri terasa, kebayang deh kalau kehidupan kita sehari-hari diawasi oleh seorang pembunuh yang menunggu waktu untuk beraksi kembali. Ngeri membayangkan kehidupan Nancy yang dihantui ketakutan karena menjadi korban pedofili dan penghancuran mental justru oleh suaminya sendiri dan harus hidup menghadapi tuduhan pembunuhan anak-anaknya sendiri. Ketakutan yang memuncak terjadi lagi setelah dia kembali harus kehilangan anak-anaknya untuk kedua kalinya tetapi kini dia memiliki seorang suami yang mempercayainya dan mendukungnya dan beberapa orang yang mengasihinya...

Perasaan ngeri dan mencekam mungkin lebih besar muncul karena kisah ini menyangkut nasib anak-anak yang dipertaruhkan dan siapapun yang pernah menjadi seorang ibu tidak akan pernah mau bahkan bermimpi sekalipun untuk menerima kenyataan seperti halnya Nancy.

View all my reviews

Pencakar Langit - Nh. Dini

Ternyata Pencakar Langit adalah salah satu kumpulan cerita yang memuat 12 cerpen dan ditulis tahun 70-an dan 80-an.Cerpen-cerpen ini berkisah mengenai kehidupan manusia dengan latar Amerika, Eropa dan Indonesia.

Beberapa cerpen dalam buku ini sangat menyentuh sanubari saya, inginnya sih menuliskan semua kesan dari setiap cerpen tersebut tapi nantilah akan saya perbaiki lagi reviewnya.

Buku ini menceritakan kesulitan yang dialami manusia baik yang hidup di desa maupun di kota besar. Bagaimana seseorang yang hidup di kota besar dengan seabrek kecanggihan harus mengalami krisis mental karena ketidak-siapan menghadapi persaingan yang mengaburkan nilai-nilai persahabatan dan rasa saling menolong.Dua cerita yang berlatar belakang di Indonesia yaitu PABRIK dan JENAZAH justru menceritakan hal yang sama padahal kisah ini terjadi di pedesaan yang semestinya masih memiliki nilai-nilai tersebut. Dua cerita inilah yang paling berkesan untuk saya karena hal tersebut kayaknya masih banyak terjadi sekarang ini, di jaman reformasi yang kenyataannya makin menjauhkan kita dari nilai-nilai tradisional masyarakat pada umumnya.

Argenteuil: Hidup Memisahkan Diri - by Nh.Dini

Buku ini saya peroleh setelah cukup lama berputar-putar keliling toko buku selama berhari-hari, dimulai sejak saya vote hingga tanggal 1 Februari 2009 akhirnya berhasil saya temukan itupun hanya tinggal satu-satunya.

Sebelum Argenteuil, belum banyak buku karya Nh. Dini yang saya baca kecuali Hati Yang Damai, dan Keberangkatan. Membaca karya-karya beliau menimbulkan rasa kagum bagaimana suatu tulisan yang diangkat dari kejadian sehari-hari yang dijalaninya bisa mendapatkan begitu banyak penghargaan Seni dan Sastra. Suatu hal yang bisa membangkitkan motivasi bagi semua pembacanya.

Argenteuil karya beliau yang belum lama diterbitkan ini mengisahkan tentang perasaan dan sikap yang Nh. Dini ambil dalam menghadapi berbagai masalah dalam kehidupannya. Dimulai dengan sikapnya untuk menerima hantaman penyakit yang dideritanya dengan lapang dada setelah berusaha menyembuhkan dengan segala upaya dan perhatian dari sang bunda sampai akhirnya mengambil keputusan untuk merubah total cara hidupnya, melepaskan diri dari segala tekanan dan berserah diri pada Yang Maha Kuasa.

Kisah ini menjelaskan bagaimana tanggung jawab seorang Nh. Dini terhadap keluarganya, kewajibannya untuk menyediakan masakan yang disukai anak-anak dan suaminya bahkan dengan tetap menyediakan menu Indonesia padahal beliau tinggal begitu jauh dari tanah airnya. Kita juga bisa belajar dari pengalamannya mengatasi kemelut rumah tangganya dengan tidak banyak mengumbar pertengkaran lebih-lebih didepan anak-anaknya. Seberat apapun derita yang diperolehnya dia sadar bahwa suami yang dimilikinya adalah pilihannya sendiri sehingga dia harus bertanggung jawab atas pilihannya sendiri tanpa harus mengorbankan masa depan anak-anaknya. Hal ini rasanya perlu kita pahami ditengah gencarnya media yang selalu mengumbar berita kekerasan rumah tangga dan perceraian.

Nh. Dini juga menunjukkan keterbukaan sikap antara ibu dan anak-anaknya dengan berdiskusi dan mendengarkan apa yang mereka inginkan. Saya cukup kaget terhadap pandangannya pada saat mendiskusikan seks dengan anak sulungnya. Tidak ada petuah dan nasehat untuk tidak melakukan hubungan sex sebelum menikah seperti yang biasanya dikatakan orangtua dengan anak-anaknya, melainkan lebih ke arah mempersiapkan mental mereka untuk menerima segala konsekuensi dan tanggung jawab terhadap pilihan yang akan diambil. Bagi saya sendiri sampai saat ini belum bisa berkata seperti apa yang Nh. Dini katakan kepada anaknya tersebut, kelak jika anak saya menanyakannya.

Satu hal lagi yang bisa kita ambil hikmahnya dalam kisah ini adalah agar kita bisa mempertahankan eksistensi kita dan kemandirian kita tanpa bergantung kepada orang lain dengan lebih mengembangkan segala bakat dan kemampuan yang kita miliki. Keputusannya menjadi dame de compani, ketekunannya mengembangkan bakatnya menulis terbukti bisa menghasilkan karya yang mengagumkan, sekaligus menunjukkan sikapnya yang bersahaja karena sebagai istri seorang pejabat tinggi negara dia tidak segan untuk hanya menjadi wanita pendamping lanjut usia. Hal yang tidak banyak kita lihat di negeri kita karena biasanya istri pejabat berlaku polah seperti halnya dialah pejabatnya dengan meminta perlakuan dan perhatian yang berlebih.

Satu hal yang mungkin kurang saya setujui dari sikap beliau adalah perasaan cintanya yang selalu dia simpan pada sang Kapten, kekasihnya. Bagi saya sikap tersebut tidak selayaknya ada pada saat kita mengambil keputusan menjadi seorang istri dari suami yang kita pilih sendiri. Barangkali untuk lebih memahami dan menilai seorang Nh. Dini, saya harus lebih banyak membaca karya-karya beliau.

Contoh Kasus algoritma

TUGAS  ALGORITMA

Contoh kasus :

Sebuah toko buku  “A” pada akhir tahun menjual buku-buku kesehatan dengan harga khusus, transaksi penjualannya dilakukan dengan ketentuan sebagai berikut :

Pada akhir transaksi ditampilkan total harga yang harus dibayar dan saldo pembayarannya.

Penyelesaian kasus :

Algoritma_Name  PenjualanBuku

Var

          Kd_buku, Ulang,Jn_buku : String

          Hrg_buku, Jml_buku, jml_harga, Potongan, Total_harga, bayar,saldo : numerik

Begin

          Ulang     ¬’Y’

                    While Ulang=’Y’ or Ulang=’y’ do

                            Read(Kd_buku,Jml_buku)

                            If (Kd_buku = 'A') or (Kd_buku='a') then

                                      Jn_buku ¬ 'Kedokteran’

                                      Hrg_buku ¬ 100000

                            Else

                                      If (Kd_buku='B')or (Kd_buku='b')  then

                                                  Jn_buku  ¬ 'Farmasi'

                                                   Hrg_buku¬ 90000

                                       Else

                                                  Jn_buku ¬ 'Keperawatan'

                                                 Hrg_buku ¬  75000

                                      Endif

                            Endif

                            Jml_Harga  ¬ Jml_buku * Hrg_buku

                            Total_harga ¬ Total_harga + Jml_Harga

                            Write(Jn_buku,Hrg_buku,Jml_harga,Total_harga)

                             Read(Ulang)

                   Endwhile

       Read(bayar)

        saldo ¬ bayar - Total_harga                                        

        Write(saldo)

        Writeln('Terima kasih, silakan datang kembali')

End

 

Algoritma di atas dapat diimplementasikan ke dalam program pascal sebagai berikut :

Program PenjualanBuku;

Uses wincrt;

Var

       Kd_buku, Ulang,Jn_buku : String;

       Hrg_buku, Jml_buku, jml_harga, Total_harga, Hrg_byr,bayar,kembali: longint;

        Potongan : real;

Begin

Ulang:='Y';

       While (Ulang='Y') or (Ulang='y')  do

        Begin

                   clrscr;

                    Write('Kode buku[A/B/C] :');Readln(Kd_buku);

                    Write('Jumlah buku      :');Readln(jml_buku);

      

                   If (Kd_buku = 'A') or (Kd_buku='a') then

                            begin

                                     Jn_buku  :='Kedokteran';

                                    Hrg_buku := 100000;

                            end;

                    If (Kd_buku='B')or (Kd_buku='b')  then

                                    begin

                                     Jn_buku  :='Farmasi';

                                    Hrg_buku :=90000;

                                    end;

                   If  (kd_buku ='C') or (Kd_buku='c') then

                                    begin              

                                    Jn_buku:='Keperawatan';

                                    Hrg_buku := 75000;

                                    End;

                   Jml_Harga := Jml_buku * Hrg_buku;

                   Total_harga:=Total_harga + Jml_Harga;

                   Writeln('Jenis Buku       :',Jn_buku);

                   Writeln('Harga buku       :',Hrg_buku);

                   Writeln('Jumlah Harga     :',Jml_harga);

                   Writeln('Total Harga      :',Total_harga);

                   writeln;

                   Write('Ada buku yang dibeli lagi (Y/T):');readln(ulang);

          End;

       Writeln;

       Write('Pembayaran       :');readln(bayar);

        kembali:= bayar - Total_harga;                                          

        Writeln('Kembalian        :',kembali);

        Writeln;

        Writeln('Terima kasih, silakan datang kembali')

End.

Algoritma Struktur Kondisi IF

Berikut adalah contoh tugas algoritma dengan struktur kondisi If 

1. Diketahui tiga buah bilangan (A, B, C) nilainya diinputkan dari keyboard. Buatlah algoritma dan program untuk menentukan nilai maksimum dari ketiga bilangan tersebut !

     A            B            C          Max

     5            1            3             A

     3            5            1             B

1            3            5             C

Jawaban :    

1.  a.) Algoritma

Algoritma_name NilaiMaksimum

Var

          A,B,C,Max     : Numerik

Begin

Read(A,B,C)

If   A > B   then

     If   A > C   then

            Max ß A

     Else

            Max ßC

     Endif

Else    

     If  B  >  C   then

            Max ß B

              Else

                     Max ß C

              Endif

          Endif

          Writeln(Max)

End

b.)  algoritma tersebut diatas dapat dituangkan menjadi program dengan bahasa pemrograman Pascal sebagai berikut :

Program nilai_Maksimum;

uses wincrt;

var

        A,B,C,Max : integer;

Begin

    clrscr;

    write('Masukkan A:');readln(A);

    write('Masukkan B:');readln(B);

    Write('Masukkan C:');readln(C);

    if A > B then

         if A > C then

             Max :=A

            ELSE

             Max :=C

    Else

       if B > C then

            Max :=B

       else                

            Max :=C;

    writeln('Bilangan yang terbesar adalah ',Max);

   

End.

2. Buatlah algoritma untuk menentukan nilai mutu yang diperoleh mahasiswa berdasarkan nilai yang diperolah dengan ketentuan :

Nilai                     Mutu

0-49                     E

50-59                   D

60-69                   C

70-84                   B

85-100                 A

Jawaban :

a) Algoritma

Algoritma_name NilaiMutu

Var

          Nama, Mt_Kuliah : string

          Nilai       : Integer

          Mutu     : Char

Begin

              Read(Nama,Mt_Kuliah,Nilai)

          If Nilai >= 85 then

                   Mutu   ‘A’

          Else

                   If Nilai  >= 70 then

                          Mutu   ‘B’

                   Else

                          If Nilai >= 60 then

                                 Mutu   ‘C’

                          Else

                                 If Nilai > = 50 then

                                           Mutu   ‘D’

                                 Else

                                           Mutu   ‘E’

                                 Endif

                          Endif

                   Endif

          Endif

          Writeln(Mutu)

End

b) Program

Program NilaiMutu;

Uses wincrt;

Var

            Nama, Mt_Kuliah : string;

            Nilai    : Integer;

            Mutu   : Char;

Begin

            Clrscr;

            Write('Nama Mahasiswa  :');Readln(Nama);

            Write('Nama Mata Kuliah :');Readln(Mt_Kuliah);

            Write('Nilai                           :');Readln(Nilai);

            If Nilai >= 85 then

                        Mutu := 'A'

            Else

                        If Nilai  >= 70 then

                                    Mutu :=  'B'

                        Else

                                    If Nilai >= 60 then

                                                Mutu :='C'

                                    Else

                                                If Nilai >= 50 then

                                                            Mutu := 'D'

                                                Else

                                                            Mutu :=  'E';

                                   

            Writeln ('Nilai Mutu             :',Mutu);

End.