Pages

Jumat, 23 September 2011

bilangan genap dan ganjil

ini merupakan script dari bilangan genap
dan ini merupakan bentuk jadi dari script di atas


dan di bawah ini merupakan script bilangan ganjil
dan gambar di bawah ini merupakam bentuk jadi dari script diatas
sekian terima kasih

Bilangan prima

kali ini saya akan mempostig tentang cara membuat program sederhana di dalam turbo pascal adapun script nya adalah sebagai berikut
dan ini merupakan gambar dari hasil script diatas

Jumat, 16 September 2011

tugas ekstra case dan if conditioni

ini merupakan script dari case
silahkan mencoba 

ini merupakan script dari if conditioni
silahkan mencoba :)
maff bila ada kesalahan 

Jumat, 09 September 2011

luas segitiga (ralat)

akhirnya saya bs menemukan cara untuk membagi 2 pada luas segitiga pada program turbo pascal caranya sm hanya saja ada beberapa perubahan seperti gambar di bawah ini
kesimpulannya hanya ada penembahan div 2 di hasil yg di bawah hehehe
selamat mencoba

Kamis, 08 September 2011

tugas ekstra

minggu lalu saya diajarkan bagaimana cara untuk membuat program sederhana yg bisa menghitung kll, luas sebuah bangunan dalam program turbo pascal .saya diberikan tugas oleh guru pembimbing ekstra komputer yaitu pak irvan untuk mencari keliling persegi, persegi panjang dan luas segitiga di dlm program turbo pascal.
ini merupakan cara untuk membuat program yg mencari keliling persegi,  keliling persegi panjang dan luas segitiga.
1. keliling persegi
langkah pertama km hrs membuka program turbo pascal terlebih dahulu tentunya km sudah th bagaimana cara membuka program ascal itu kan. setelah program terbuka silakan km bwt semirip mungkin apa yg ada di gambar di bawah ini

setelah km selesai menulis kata2 seperti gambar diatas km hrs mengcompile dahulu untuk mengecek apakah program itu bs di jalankan atau tidak jika berhasil maka akan tertulis compile successfull itu membuktikan kalau program sederhana yg km bwt di turbo pascal telah berhasil.
silahkan mencoba :)

2. keliling persegi panjang
sama seperti keliling persegi  hanya saja ada sedikit perubahan yaitu seperti gambar di bawah ini 

setelah itu langkah2 lainna sama dengan cara persegi
3. luas segitiga
untuk mencari luas sebenarnya sama saja tetapi di luas segitiga saya menemukan kesulitan yaitu untuk membagi 2 hasil dari alas x tinggi maka dari itu saya menggunakan cara seperti yg ada di gambar di bawah ini
dan cara selanjutnya sm dengan cara kll persegi dan kll persegi panjang.

jika kalian ingin mencoba untuk melihat seperti apa jadinya program yg anda bwt (seperti ketiga gambar diatas) kalian buka dosbox kalian dan ketik
1. mount c c:\tp7 lalu enter
2. c: lalu enter
3. (tulis nama file yg kalian save td ).exe
    contoh : persegi.exe lalu enter
4. setelah itu akan muncul apa yg kalian program dalam turbo pascal tersebut
   contoh : saya ambil pada persegi lihat gambar di bawah ini
silahkan mencoba :)


sekian dulu yg saya post tentang tugas saya. saya harap apa yg sy post bs bermanfaat. mohon maaf bila ada kekurangan jika kalian memiliki cara untuk mencari luas persegi itu bisa di share disini (melalui komen y hehehehehe) :D

Jumat, 02 September 2011

cara menginstal turbo pascal pada windows 7

Minggu lalu di ekstra komputer saya diajarkan tentang cara2 menggunakan turbo pascal.
tahap demi tahapnya makin ribet hehehehe:D
selain itu pada ekstra di jelaskan jg bagian2 dari turbo pascal itu !
ini merupakan beberapa langkah2 untuk menginstal turbo pascal pada windows 7
1. pastikan anda sudah mempunyai folder turbo pascal di laptop atau komputer anda 
2. buat new folder di drive c degan nama  TP7
3. copy semua folder yg ada di folder turbo pascal yang kalian punya ke folder TP7 yang   kalian buat di drive c 
4. lalu instal aplikasi DOSBox
5. setelah kalian selesai menginstalnya lalu jalankan aplikasi DOSbox
6. pada jendela yang muncul ketikkan MOUNT C C:\TP7
7. setelah mounting selesai ketik C: lalu enter,kemudian ketikkan BIN\TPX.exe lalu enter
8. setelah itu baru kalian mendapatkan bentuk turbo pascal itu seperti apa :)  

silahkan mencoba    

Kamis, 25 Agustus 2011

Untuk merubah judul address bar

Berikut ini cara-cara merubah judul address bar anda :

  • Login dulu ke akun blogger anda
  • Tata letak
  • Edit HTML
  • Cari kode <head>
  • Kemudian copy paste kode di bawah ini dan letakkan di atasnya
  • <script type="text/javascript">
    //<![CDATA[
    function tb9_makeArray(n){
    this.length = n;
    return this.length;
    }
    tb9_messages = new tb9_makeArray(1);
    tb9_messages[0] = "Aj wijaya";
    tb9_rptType = 'infinite';
    tb9_rptNbr = 5;
    tb9_speed = 100;
    tb9_delay = 2000;
    var tb9_counter=1;
    var tb9_currMsg=0;
    var tb9_timerID = null
    var tb9_bannerRunning = false
    var tb9_state = ""
    tb9_clearState()
    function tb9_stopBanner() {
    if (tb9_bannerRunning)
    clearTimeout(tb9_timerID)
    tb9_timerRunning = false
    }
    function tb9_startBanner() {
    tb9_stopBanner()
    tb9_showBanner()
    }
    function tb9_clearState() {
    tb9_state = ""
    for (var i = 0; i < tb9_messages[tb9_currMsg].length; ++i) {
    tb9_state += "0"
    }
    }
    function tb9_showBanner() {
    if (tb9_getString()) {
    tb9_currMsg++
    if (tb9_messages.length <= tb9_currMsg) {
    if ((tb9_rptType == 'finite') && (tb9_counter==tb9_rptNbr)){
    tb9_stopBanner();
    return;
    }
    tb9_counter++;
    tb9_currMsg=0;
    }
    tb9_clearState()
    tb9_timerID = setTimeout("tb9_showBanner()", tb9_delay)
    }
    else {
    var tb9_str = ""
    for (var j = 0; j < tb9_state.length; ++j) {
    tb9_str += (tb9_state.charAt(j) == "1") ? tb9_messages[tb9_currMsg].charAt(j) : "____"
    }
    document.title = tb9_str
    tb9_timerID = setTimeout("tb9_showBanner()", tb9_speed)
    }
    }
    function tb9_getString() {
    var full = true
    for (var j = 0; j < tb9_state.length; ++j) {
    if (tb9_state.charAt(j) == 0)
    full = false
    }
    if (full) return true
    while (1) {
    var num = tb9_getRandom(tb9_messages[tb9_currMsg].length)
    if (tb9_state.charAt(num) == "0")
    break
    }
    tb9_state = tb9_state.substring(0, num) + "1" + tb9_state.substring(num + 1, tb9_state.length)
    return false
    }
    function tb9_getRandom(max) {
    var now = new Date()
    var num = now.getTime() * now.getSeconds() * Math.random()
    return num % max
    }
    tb9_startBanner()

    //]]>
    </script>
  • ganti tulisan merah dengan nama yang anda inginkan
  • lalu simpan template