choutib th3 Jookam - 313

Berikut adalah Daftar Isi / Index dari blog ini: ============================================================== Sedang Memuat daftar isi .. Mohon Tunggu.. :) ==============================================================

Pagi sobat semua, kali ini saya mau sharing cerita tentang aborsi, sumbernya gue dapat dari facebook juga.. Hehehe :) Langsung deh, kita cek ke TKP Mama sayang,... Aku di surga sekarang, duduk di pangkuan Tuhan. Ia mengasihiku dan menangis bersamaku, sebab pedih pilu hatiku begitu ingin aku menjadi putri mungilmu. Tidak terlalu mengerti aku akan apa yang telah terjadi. Aku begitu senang ketika mulai menyadari keberadaanku. Aku ada disuatu tempat yang gelap, namun nyaman.

Met Pagi sobat netter semua, Gimana kabar kalian? Baik-baik aja kan, pagi ini gue mau share cerita yang bisa kita jadikan renungan bagi bangsa Indonesia semua, sebenernya sieh cerita ini gue dapat dari grup fb, hehehe... Tapi, ora popo lah, karena "sharing is sexy" Cekidooot sobat, kita simak ceritanya Cerita mahasiswa Indonesia di Ausie (Nyataa) Suatu pagi, kami menjemput seseorg klien di bandara. Org itu sdh tua, kisaran 60 thn, pengusaha asal Singapura, beliau menceritakan pengalaman2 hidupnya. Beliau berkata, "Our country is so rich!" Ah biasa banget denger kata-kata itu. Tapi tunggu dulu. "Indonesia doesn't need the world, but the world needs Indonesia," lanjutnya.... "Everything can be found here in Indonesia, You don't need the world." Lanjutnya "Mudah saja, Indonesia paru-paru dunia.

Pagi sobat netter semua... pagi ini gue mau sharing script pascal lagi nieh, moga bermanfaat bagi kalian semua, Langsung aja kita cek ke TKP... Buatlah program dengan ketentuan sebagai berikut * menggunakan 'if ... then' atau 'case of' * OUTPUT : Masukan pilihan anda ...     1. Mencari bilangan terbesar dari 3 buah bilangan     2. Mencari bilangan ganjil Itu soalnya, dan jawabannya adalah . . . uses wincrt; var pilih,sisa,bil,A,B,C : integer;         begin writeln('1.Mencari bilangan terbesar dari 3 buah bilangan'); writeln('2.Mencari bilangan ganjil'); write('pilih no yang anda kehendaki ?  ');readln(pilih);         begin         if pilih=1 then         begin         write('ketikkan nilai A =');readln(A);         write('ketikkan nilai B =');readln(B);         write('ketikkan nilai C =');readln(C);              if (A>B) and (A>C) then              begin              write('bilangan t

Assalamualaikum Wr. Wb. Selamat datang di blog saya, senang sekali anda telah mau berkunjung ke blog saya.. Blog ini berisi segala macam pengetahuan, ilmu, tutorial, how to, step by step, dan lain sebagainya yang bermanfaat bagi saya dan anda. :) Sebelumnya, saya minta maa kalau sebagian isi dari blog saya ini ada yang co-pas dari blog / situs lain, karena memang tujuan dari pembuatan blog ini adalah untuk mengumpulkan semua info yang berguna. :P Karena, saya akui sendiri saya merasakan manfaat yang besar dari blog ini, karena secara langsung maupun tidak langsung blog ini bisa menjadi materi referensi ilmu-ilmu yang saya miliki.. karena seberapa hebatnya manusia mempunyai keterbatasan daya ingat.. oleh karena saya mempostkannya ilmu-ilmu saya dalam blog ini.. Hehehehehe Sekian asal-usul ataupun tujuan dari pembuatan blog ini Kritik, Saran, Caci-maki, dan Hal lain yang sifatnya membangun sangat saya harapkan dari sobat netter semua. Wassalamualaikum

WESTLIFE Allow Us To Be Frank Album Back Home Album Coast To Coast Album Face To Face Album Turnaround Album Unbreakable V.1: The Greatest Hits Album Westlife Album World Of Our Own Album Where We Are The Love Album No. 1 Hits and Rare Tracks Released Atau kalo mau liat cover depan albumny bisa dilihat disini heheheheee Ini link hompagenya wetlife Ok, sekian postingannya SALAM UNTUK PENGGEMAR WESTLIFE

Pagi sobat netter, Pagi ini gue mau share scrip pascal nieh.. Sebenernya ni scrip standar sieh, tapi gak papalah buat para pemula biar lebih memahami.. wuehehehee langsung aja sob, cekidoot Ini screen shootnya...    Gampang kan, secara gitu lho.. Scrip standar soalee, hehehe.. Ini Screenshoot setelah sciptnya dijalanin.. Dan ini Scripnya : program latihan; uses wincrt; var panjang,lebar,tinggi :integer; volume:real; begin write('masukan panjang :');readln(panjang); write('masukan lebar :');readln(lebar); write('masukan tinggi :');readln(tinggi); volume:=(panjang*lebar*tinggi); write('Volumenya adalah :',luas:0:2); end. SEKIAN, dan TERIMA KASIH