Ketika Qabliyah Subuh (Sholat Sunah Fajar) Lebih Mahal dari pada Dunia & Isinya

Seorang pengusaha nan shalih bernama Kajiman –bukan nama asli-, malam itu sedang menginap di sebuah hotel berbintang lima di kawasan Simpang Lima Semarang. Usai melakukan qiyamul-lail ia bergegas ke luar hotel untuk mencari masjid terdekat dan shalat Shubuh berjamaah di sana. Waktu di jam tangan Kajiman menunjukkan bahwa waktu adzan Shubuh kira-kira setengah jam ke depan.

Begitu keluar dari lobby hotel, Kajiman pun memanggil seorang tukang becak yang sedang mangkal lalu ia naik ke atas becak.

"Mau diantar kemana, Pak?" tanya tukang becak bernama Ibnu. Begitu ditanya, Kajiman menjawab, "Antar saya keliling kota Semarang saja, Pak!" Ia menjawab sedemikian karena ia tahu bahwa waktu Shubuh masih jauh tersisa.

Maka Ibnu sang tukang becak mengantarkan Kajiman berkeliling Simpang Lima sebagai pusat kota Semarang.

Kira-kira belasan menit sudah Ibnu mengayuhkan pedal becak mengantarkan Kajiman yang hendak melihat panorama kota Semarang saat pagi menjelang. Beberapa jalan sudah mereka susuri berdua. Lalu sayup-sayup terdengar suara tarhim dari sebuah corong menara masjid di sana.

Membuat Program Matriks dengan Turbo Pascal

Ya, kali ini saya akan berbagi ilmu tentang Turbo Pascal , Turbo Pascal merupakan salah satu software yang dapat digunakan untuk membuat macam-macam program, kali ini saya akan berbagi program Matriks, berikut coding nya ^.^ :


program penjumlahan_matrik;
uses WinCrt;
var
   matriks1, matriks2, matrik_hasil : array[1..3,1..3]of integer;
   i,j:integer;
begin
Randomize;
for i:=1 to 3 do
for j:=1 to 3 do
    begin
    matriks1[i,j]:=Random(10);
    matriks2[i,j]:=Random(10);
    end;

writeln('matriks 1');
for i:=1 to 3 do
    begin
    for j:=1 to 3 do
    begin
         write(matriks1[i,j]:5);
    end;
    writeln;
    end;

Membuat Program Repainting (Mengecat) dengan menggunakan Turbo Pascal

 Ya, kali ini saya akan berbagi ilmu tentang Turbo Pascal , Turbo Pascal merupakan salah satu software yang dapat digunakan untuk membuat macam-macam program, kali ini saya akan berbagi program repainting (Mengecat), berikut coding nya ^_^ :

program mengecat;
uses wincrt;
var
   panjang_dinding,
   lebar_dinding,
   luas_dinding,

   panjang_jendela,
   lebar_jendela,
   luas_jendela,
   jumlah_jendela,
   total_luas_jendela,
   panjang_pintu,

   lebar_pintu,
   luas_pintu,
   dinding_dicat,

   biaya_cat,
   total_biaya_semua

Membuat Program Menu Pilihan ( case of ) dengan Menggunakan Turbo Pascal

Ya, kali ini saya akan berbagi ilmu tentang Turbo Pascal , Turbo Pascal merupakan salah satu software yang dapat digunakan untuk membuat macam-macam program, kali ini tentang program menu pilihan, dari program ini kita bisa memasukan pilihan-pilihan seperti yang kita ingin kan, misalnya tentang gaji, menu makanan/ minuman, daftar film bioskop, daftar harga, dll  yang kita ingin masukan ke daftar, INGAT! harus dengan menggunakan "case pilihan of" , contoh yang saya buat seperti ini coding nya ^.^ :

program menu_pilihan;
uses wincrt;
var nama: string;
    gaji, tunjangan: real;
    gaji_bersih: real;
    pilihan : char;
    a, b :integer;
begin
writeln('---MENU---');
writeln('1.gaji karyawan');
writeln('2.angka segitiga pascal to');
writeln('3.angka segitiga pascal downto');
writeln('PILIHAN [1-3]:') ;
readln(pilihan);

case pilihan of

Membuat Program Penghitung Luas Bangun Datar dengan Menu Pilihan ( case of ) menggunakan Turbo Pascal

Ya, kali ini saya akan berbagi ilmu tentang Turbo Pascal , Turbo Pascal merupakan salah satu software yang dapat digunakan untuk membuat macam-macam program, sekarang saya share Program Penghitung Luas Bangun Datar , berikut coding nya ^.^ :

program menghitung_Luas_Bangun_Datar;
uses wincrt;
var luas,r,alas,tinggi,panjang,lebar:real;
    pilihan:char;

begin
writeln('----Pilih Bangun Datar yang Ingin Dihitung----');
writeln('1.Menghitung Luas Lingkaran');
writeln('2.Menghitung Luas Persegi Panjang');
writeln('3.Menghitung Luas Segitiga');
writeln('PILIHAN [1-3]:') ;
readln(pilihan);

case pilihan of

Membuat Program Kalkulator Standard dengan Turbo Pascal

Ya, kali ini saya akan berbagi ilmu tentang Turbo Pascal , Turbo Pascal merupakan salah satu software yang dapat digunakan untuk membuat macam-macam program, seperti Program Kalkulator Standard , yang saya share di sini, berikut coding nya ^.^ :


program kalkulator_Standard;
uses wincrt;
var n1,n2,p,h:real;
begin
writeln('program kalkulator');
writeln('=====================');
write('masukan nilai pertama= ');
readln(n1);
write('masukan nilai kedua= ');
readln(n2);

"Kata Motivasi" - Albert Einstein

“

Imajinasi lebih penting dari pengetahuan. Pengetahuan itu terbatas, sedangkan imajinasi meliputi seluruh dunia, merangsang kemajuan, melahirkan evolusi.

”

“

Jangan pernah melawan kata hati walaupun negara memerintahkan.

”

“

Hendaklah segalanya dibuat sederhana mungkin, tetapi bukan asal sederhana.

”

“

Saya tidak bisa membayangkan Tuhan yang menghadiahi dan menghukum makhluk ciptaannya.

”

“

Ilmu pengetahuan tanpa agama adalah pincang.

”

“

Perdamaian tidak dapat dijaga dengan kekuatan. Hal itu hanya dapat diraih dengan pengertian.

”

"Kata Motivasi" - Winston Churchill

“

Orang pesimis melihat kesulitan di setiap kesempatan. Orang optimis melihat kesempatan di setiap kesulitan.

”

“

Harga sebuah kesuksesan besar adalah sikap yang bertanggung jawab.

”

“

Sikap adalah sebuah perbuatan kecil yang mampu menghasilkan perbedaan yang besar.

”

“

Untuk meraih kesuksesan, tidaklah cukup dengan melakukan yang terbaik. Terkadang kita harus melakukan apa yang diperlukan.

”

thanks for sumber: http://katamotivasi-new.blogspot.com/

"Kata Motivasi" - Mahatma Gandhi

“

Mereka yang lemah tak akan mampu memberi seuntai maaf tulus. Pemaaf sejati hanya melekat bagi mereka yang berjiwa tangguh.

”

“

Mereka yang lemah takkan pernah mampu mengampuni. Ampunan adalah kepemilikan (atribut) mereka yang kuat.

”

“

Janganlah Anda mau digenggam dunia sehingga Anda tenggelam dalam kesulitan-kesulitannya, akan tetapi letakkanlah dunia itu di dalam telapak tangan Anda sehingga Anda dapat menggoncangkannya sesuka hati.

”

“

Orang lemah tidak pernah bisa memaafkan karena memberi maaf hanya dapat dilakukan oleh orang yang kuat.

”

“

Masa depan bergantung pada apa yang kita lakukan saat ini.

”

thanks for sumber: http://katamotivasi-new.blogspot.com/

"Kata Motivasi" - John F. Kennedy

“

Saya percaya bahwa negara ini harus terus berupaya dalam mencapai tujuannya menjejakkan kaki seorang manusia di Bulan dan membawanya pulang dengan selamat ke Bumi sebelum dasawarsa ini berakhir. Tidak ada proyek antariksa selama periode ini yang akan lebih mengagumkan bagi manusia atau lebih penting bagi penjelajahan antariksa jangka panjang; dan tidak ada proyek lain yang akan lebih sulit atau lebih mahal untuk dicapai.

”

“

Manusia harus menghentikan perang atau peranglah yang akan menghentikan manusia.

”

“

Kebebasan tidak dapat dilihat secara terpisah; ketika seseorang diperbudak, orang-orang lainnya juga tidak memiliki kebebasan. Ketika semua orang memiliki kebebasan, maka kita akan dapat menyongsong hari tersebut saat kota ini akan bersatu dan negara ini dan Benua Eropa yang hebat ini dalam dunia yang damai dan penuh harapan. Saat hari tersebut tiba, dan pasti akan tiba, warga Berlin Timur dapat merasa puas karena mereka telah berada di barisan depan sepanjang hampir dua dasawarsa. Seluruh manusia yang memiliki kebebasan, di manapun mereka berada, adalah warga Berlin, dan oleh karena itu, sebagai seseorang yang memiliki kebebasan, saya dengan bangga dapat berkata "Ich bin ein Berliner (Saya orang Berlin).

”

“

Jangan tanyakan apa yang negara berikan kepadamu, tapi tanyakan apa yang kamu berikan kepada negaramu!

”

“

Benar atau salah itu negara saya.

”

“

Janganlah pernah berunding karena ketakutan, tetapi jangan takut untuk berunding.

”

thanks for sumber: http://katamotivasi-new.blogspot.com/

"Kata Motivasi" - Kahlil Gibran

“     Jika orang lain menghina Anda, Anda mungkin melupakan penghinaan itu, tapi jika Anda menghina orang lain, Anda akan selalu mengingatnya.     ”

“     Jika Anda membeberkan rahasia Anda kepada angin, Anda tidak boleh menyalahkannya jika angin membuka rahasia itu kepada pohon-pohon.     ”

“     Kelembutan dan kebaikan bukanlah tanda-tanda kelemahan dan putus asa, tetapi adalah penjelmaan sebuah kekuatan.     ”

“     Arti penting manusia bukan terletak pada apa yang dia peroleh, melainkan apa yang sangat ia rindukan untuk diraih.     ”

thanks for sumber: http://katamotivasi-new.blogspot.com/