Ternyata GMT Bukan Di Greenwich, Tapi Di Ka’bah

Baca selengkapnya »

Astronout Neil Amstrong telah membuktikan bahwa kota Mekah adalah pusat dari Planet Bumi. Fakta ini telah di diteliti melalui sebuah penelitian Ilmiah. Ketika Neil Amstrong untuk pertama kali

nya melakukan travel ke luar angkasa dan mengambil gambar planet Bumi, dia berkata: “Planet Bumi ternyata menggantung di area yang sangat gelap, siapa yang menggantungnya?”

Ternyata GMT Bukan Di Greenwich, Tapi Di Ka’bah

Posted by : Arik noviwibawa

Date :Kamis, 29 November 2012

With 0comments

KISAH NYATA KEAJAIBAN-KEAJAIBAN DI JALUR GAZA

Baca selengkapnya »

Bismillahir-Rahmaanir-Rahim ... 

Gaza, itulah nama hamparan tanah yang luasnya tidak lebih dari 360 km persegi. Berada di Palestina Selatan, “terjepit” di antara tanah yang dikuasai penjajah Zionis Israel, Mesir, dan laut Mediterania, serta dikepung dengan tembok di sepanjang daratannya.

Sudah lama Israel “bernafsu” menguasai wilayah ini. Namun, jangankan menguasai, untuk bisa masuk ke dalamnya saja Israel sangat kesulitan.

KISAH NYATA KEAJAIBAN-KEAJAIBAN DI JALUR GAZA

Posted by : Arik noviwibawa

Date :

With 0comments

Tips dan Trik Menjaga Kesehatan Mata

Baca selengkapnya »

1.      Periksa mata setiap 12 bulan
Masalah penglihatan yang tidak ditangani akan berkembang semakin parah, dan memakai lensa kontak atau kacamata yang tidak lagi cocok untuk Anda dapat menyebabkan masalah penglihatan dan sakit kepala.

2.      Di musim panas, pakailah kacamata
Sinar UV dapat membuat kerusakan serius pada mata. Kacamata yang baik dapat mencegah hal ini. Ketika membeli kacamata, pastikan yang dapat memantulkan paling tidak 98% radiasi UV.

3.      Makanlah nutrisi yang baik untuk Anda dan mata Anda
Studi baru-baru ini menunjukkan bahwa vitamin dan kelompok antioksidan dapat mencegah, atau paling tidak memperlambat degenerasi makular dan pertumbuhan katarak. Nutrisi yang baik bagi tubuh juga baik untuk mata.

4.      Jika Anda membaca atau bekerja menggunakan komputer, pastikan cahayanya tepat
Bekerja dengan cahaya minim dapat menyebabkan kelelahan mata, tapi cahaya yang terlalu terang juga tidak baik. Arah cahaya terbaik jika bekerja menggunakan komputer adalah dari lampu meja bercahaya lembut dari arah samping. Kurangi tingkat terang (brightness) monitor. Warnanya memang jadi tak terlalu tajam, tapi mata akan jadi lebih nyaman.

5.      Istirahatkan mata Anda
Hampir semua orang merasakan mata mereka jadi tidak nyaman setelah duduk seharian di depan layar komputer. Hal ini disebabkan mata berkedip 25% lebih sedikit dari biasanya, yang menyebabkan mata jadi kering. Satu hal yang bisa dilakukan adalah menutup mata Anda dan menghitung sampai 5 sebelum membukanya kembali. Hal lainnya adalah berpaling dari layar monitor dan fokus pada sebuah objek yang jauh, sesering mungkin.

6.      Cari lensa kontak dengan kualitas baik
Tidak semua lensa kontak sama. Ada yang aman untuk mata Anda, dan ada juga yang beresiko merusak mata. Tahu apa yang ditawarkan industri lensa kontak modern akan membantu untuk membuat pilihan yang bijak, tidak begitu saja mengikuti apa kata dokter.

7.      Jika memakai lensa kontak, rawatlah dengan baik
Lensa kontak tidaklah begitu merepotkan, tapi Anda juga tak dapat mengabaikan kebersihannya. Setiap kali akan memakai atau melepaskan lensa kontak Anda, bilaslah. Anda juga harus mengganti cairannya, ketika Anda menaruh di tempatnya waktu Anda tidur di malam hari.

8.      Pakailah lensa kontak sesuai jadwal yang disarankan
Ada orang yang berbiat menghemat dengan memakai lensa kontak lebih lama daripada yang dimaksudkan. Ini bukanlah hal yang baik. Meskipun kulitas lensanya tidak akan berkurang, tumpukan protein dapat mengaburkan penglihatan Anda. Hal lain yang harus dipertimbangkan adalah, semakin lama Anda memakai lensa kontak Anda, semakin tinggi resiko mata Anda terkena infeksi.

9.      Cobalah Terapi kacamata

Untuk mengurangi mata minus, plus, dan silinder anda yang telah berlebih dengan menggunakan kacamata terapi (pinhole glasses) diharapkan dengan ini akan mengurangi dampak dari penggunaan kacamata yang berlebihan.

Sumber :
- oneminuteonline

Tips dan Trik Menjaga Kesehatan Mata

Posted by : Arik noviwibawa

Date :Senin, 26 November 2012

With 0comments

Tips dan Trik Cara Merawat Laptop dengan Baik dan Benar

Baca selengkapnya »

1.      Jangan sembarangan mendownload software gratis dari internet.

Terlebih lagi misalnya software yang seolah-olah sebagai suatu antivirus. Gunakan software-software yang telah Anda dapatkan dari paket laptop yang Anda beli. Risiko virus bisa merusak ke dalam laptop Anda jika Anda sembarangan menggunakan software dari internet. Jika Anda tetap ingin menggunakan software hasil download, maka pastikan sudah Anda scan software tersebut dengan antivirus yang Anda miliki.

2.      Jangan memberikan Penutup apapapun termasuk sarung Laptop pada saat Laptop anda dalam keadaan menyala karena berdasarkan pengalaman Laptop teman saya Processor Laptopnya akan mati karena sirkulasi udara yang tidak ada di bawah permukaan Laptop

3.      Menurut survei, kerusakan laptop yang paling umum terjadi pada harddisk dan LCD display/layar. Kerusakan harddisk diakibatkan benturan atau terjatuh. Kerusakan LCD biasanya karena terpapar sinar matahari dan tekanan fisik.

4.      Rapikanlah kabel-kabel adaptor atau kabel lain yang sedang terhubung dengan laptop, jangan sampai membuat orang lain tersandung.

5.      Selain kerusakan harddisk dan LCD, tumpahan cairan adalah penyebab kerusakan laptop yang paling umum, atau pakai selembar film-transparan yang disebut ‘keyboard protector’.

6.      Hindari Getaran dan Jauhkan laptop dari alat pengeras suara, misalnya loudspeaker, mesin/kendaraan berat, dan sumber getaran lainnya.

7.      Hindarkan laptop dari sinar x-ray di airport.

8.      Jaga kebersihan laptop, lap dengan kain bersih atau kapas agar bebas debu.

9.      Lindungi modem laptop. Gunakan modem yang mempunyai fitur digital-line guard. Karena fitur ini akan menjaga modem dari kerusakan jika secara tidak sengaja mencolokkan kabel modem ke jack telpon digital PABX atau jalur ISDN. Dan berhati-hatilah ketika akan mencolokkan kabel telepon ke laptop karena kawat logam dalam konektor modem laptop sangat tipis dan mudah bengkok.

10.  Dalam iklim Asia, suhu yang lembab bisa jadi masalah besar untuk laptop yang dirancang di Amerika Serikat. Untuk mengurangi kemungkinan masalah, pastikan laptop tersimpan di tempat yang kering dan sejuk. Jika laptop tidak digunakan untuk waktu yang lama, simpanlah laptop dalam wadah yang rapat dan masukkan silica gel . Silica gel ini seperti halnya yang terdapat dalam botol obat, kemasan barang2 elektronik (bungkusan kecil bertuliskan ‘Dessicant Silica Gel’). Atau bisa dibeli di toko bahan kimia. Silica gel ini merupakan bahan kimia yg bersifat Higroskopis (menyerap uap air / kelembaban).

11.  Listrik padam dan gangguan tegangan dapat terjadi sewaktu-waktu, di rumah, di kamar hotel atau di kantor. Jika memungkinkan, gunakanlah ’surge-protector’ jika sedang menggunakan AC outlet. Dan jangan lupa membuat back-up data secara rutin.

12.  Gunakanlah selalu tas laptop ketika sedang bepergian.

13.  Jika ingin membungkus laptop untuk dikirim atau untuk keperluan lain, gunakanlah kotak pelindung yang kuat, dan bungkuslah dengan busa atau spons yang dapat menyerap getaran.

14.  Jangan sekali-sekali meletakkan benda berat di atas laptop.

15.  Jika laptop bermasalah, jangan mencoba untuk membongkar sendiri. Sebaiknya serahkan ke teknisi atau service-center terdekat. Karena mungkin saja kerusakan malah akan menjadi semakin berat. Khusus untuk laptop yang masih dalam masa garansi - membongkar laptop dapat merusak sticker garansi (warranty seal) yang masih melekat pada laptop.

16.  Ketika akan mengangkat laptop yang sedang terbuka, jangan mengangkatnya sambil memegang pada bagian display/layar, angkatlah pada bagian bawah/keyboard

17.  Jangan memasukkan disket pada bagian sudutnya. Memasukkan disket setengah-setengah dapat merusak disk-drive. Begitu juga ketika membuka atau menutup tray drive CD-ROM/DVD-ROM untuk memasukkan atau mengeluarkan disk. Jangan menyentuh lensa pada tray CD-ROM. Peganglah compact-disc pada bagian pinggir, bukan pada permukaan disk.

18.  Jangan mencolokkan kabel modem laptop pada PBX (private branch exchange) atau saluran telpon digital. Laptop hanya dapat menggunakan saluran PSTN (public-switched telephone network). Penggunaan saluran telpon selain PSTN dapat merusak modem laptop.

19.  Rawatlah baterai laptop, jangan sampai bocor karena dapat merusak slot baterai.

20.  Jangan pindah-pindahkan laptop pada saat masih hidup. Laptop yang sedang hidup berarti harddisknya juga sedang bekerja sehingga apabila digerakkan dapat menyebabkan head harddisk menggores cylinder sehingga akan berakibat fatal.

21.  Jauhkan laptop dari medan magnet yang kuat, bahan cair dan sumber panas/dingin atau perubahan suhu yang ekstrim.

22.  Hindari sinar matahari langsung dan pastikan laptop selalu diletakkan pada permukaan yang rata.

Sumber :
- devit1104

Tips dan Trik Cara Merawat Laptop dengan Baik dan Benar

Posted by : Arik noviwibawa

Date :

With 0comments

CONTOH PROGRAM COBOL

Baca selengkapnya »

       IDENTIFICATION DIVISION.

       PROGRAM-ID. T2202.

       ENVIRONMENT DIVISION.

       DATA DIVISION.

       WORKING-STORAGE SECTION.

           01 NAMA PIC X(30).

           01 NPM PIC X(8)

           01 KELAS PIC X(5).

           01 KAMPUS PIC X(30).

       01 ISIMENU.

           02 JARI PIC 99V99.

           02 LLINGKARAN PIC 99999V99.

           02 ALAS PIC 99V99.

           02 TINGGI PIC 99V99.

           02 LSEGITIGA PIC 99V99.

           02 PANJANG PIC 99V99.

           02 LEBAR PIC 99V99.

           02 LPERPANJANG PIC 99999V99.

       01 PILIH PIC 9.

       01 HASIL.

           02 OHASIL PIC ZZZZZ.99.

       SCREEN SECTION.

       01 HAPUS-LAYAR.

           02 BLANK SCREEN.

       01 LAYAR-MENU.

           02 LINE 3 COLUMN 20 VALUE 'MENU'.

           02 LINE 4 COLUMN 20 VALUE '1). MENGHITUNG LUAS LINGKARAN'.

           02 LINE 5 COLUMN 20 VALUE '2). MENGHITUNG LUAS SEGITIGA'.

           02 LINE 6 COLUMN 20 VALUE '3). MENGHITUNG LUAS P.PANJANG'.

           02 LINE 7 COLUMN 20 VALUE '4). SELESAI/KELUAR'.

           02 LINE 10 COLUMN 20 VALUE 'PILIH = '.

       01 BDATA.

           02 LINE 3 COLUMN 20 VALUE 'PERHITUNGAN '.

           02 LINE 4 COLUMN 20 VALUE 'MATEMATIKA'.

         

       PROCEDURE DIVISION.

       MULAI.

           DISPLAY (2,3) "NAMA   : ".

           ACCEPT NAMA.

           DISPLAY (3,3) "NPM    : ".

           ACCEPT NPM.

           DISPLAY (4,3) "KELAS  : ".

           ACCEPT KELAS.

           DISPLAY (5,3) "KAMPUS : ".

           ACCEPT KAMPUS.

       MENU.

           DISPLAY HAPUS-LAYAR.

           DISPLAY LAYAR-MENU.

           ACCEPT PILIH.

           DISPLAY HAPUS-LAYAR.

       SELEKSI.

           IF PILIH = 1 GO TO LINGKARAN.

           IF PILIH = 2 GO TO SEGITIGA.

           IF PILIH = 3 GO TO PERPANJANG.

           IF PILIH = 4 GO TO SELESAI.

       SEGITIGA.

           DISPLAY HAPUS-LAYAR.

           DISPLAY BDATA.

           DISPLAY (5,20) 'NAMA  :', NAMA.

           DISPLAY (6,20) 'KELAS :', KELAS.

           DISPLAY (8, 10)'===MENGHITUNG LUAS SGITIGA==='.

           DISPLAY (9, 13) 'ALAS ='.

           ACCEPT ALAS.

           DISPLAY (10, 13) 'TINGGI ='.

           ACCEPT TINGGI.

           COMPUTE LSEGITIGA = ALAS * TINGGI / 2.

           MOVE LSEGITIGA TO OHASIL.

           DISPLAY (12, 14) 'LUAS SEGITIGA = '

           DISPLAY (12, 30) OHASIL.

           DISPLAY (20, 12) ' '.

           STOP 'TEKAN ENTER UNTUK MELANJUTKAN'.

           GO TO MENU.

       LINGKARAN.

           DISPLAY HAPUS-LAYAR.

           DISPLAY BDATA.

           DISPLAY (5,20) 'NAMA  :', NAMA.

           DISPLAY (6,20) 'KELAS :', KELAS.

           DISPLAY (8, 10)'===MENGHITUNG LUAS LINGKARAN==='.

           DISPLAY (9, 13) 'JARI-JARI : '.

           ACCEPT JARI.

           COMPUTE LLINGKARAN = 3.14 * JARI * JARI.

           MOVE LLINGKARAN TO OHASIL.

           DISPLAY (13, 15) 'LUAS LINGKARAN = '.

           DISPLAY (13, 30) OHASIL.

           DISPLAY (20, 12) ' '.

           STOP 'TEKAN ENTER UNTUK MELANJUTKAN'.

           GO TO MENU.

       PERPANJANG.

           DISPLAY HAPUS-LAYAR.

           DISPLAY BDATA.

           DISPLAY (5,20) 'NAMA  :', NAMA.

           DISPLAY (6,20) 'KELAS :', KELAS.

           DISPLAY (8, 10)'===MENGHITUNG LUAS PERSEGI PANJANG==='.

           DISPLAY (9, 13) 'PANJANG :'.

           ACCEPT PANJANG.

           DISPLAY (10, 13) 'LEBAR :'.

           ACCEPT LEBAR.

           COMPUTE LPERPANJANG = PANJANG * LEBAR.

           MOVE LPERPANJANG TO OHASIL.

           DISPLAY (13, 15) 'LUAS PERSEGI PANJANG = ',

           DISPLAY (13, 35) OHASIL.

           DISPLAY (20, 12) ' '.

           STOP 'TEKAN ENTER UNTUK MELANJUTKAN'.

           GO TO MENU.

       SELESAI.

           STOP RUN.

OUTPUT :

Selamat Mencoba ^__^

CONTOH PROGRAM COBOL

Posted by : Arik noviwibawa

Date :Sabtu, 24 November 2012

With 1 comments: