Program Pascal Distribusi Binomial
1 komentar
Unknown
-
Pada postingan kali ini saya akan mencoba membuat program Distribusi Binomial yang biasanya masuk di mata kuliah Statistika. Awalnya program ini saya buat untuk memenuhi tugas dari dosen mata kuliah tersebut di Undar . Langsung saja kita coba ya...
Mudah bukan.....Okey !! segitu dulu postingan kali ini...semoga bisa bermanfaat dan dapat aplikasikan :)
Silahkan di CoPas asal disertakan sumbernya :) hehehe :p
Read more
Disini untuk IDE compilernya saya memakai Freepascal jika sobatt sekalian memakai IDE yang lain berarti tiggal disesuaikan aja...intinya kan sama saja to :)
Bagi sobat yang belum mempunyai IDE tinggal download Freepascal nya di link berikut :
Rumus intuk distribusi Binomial adalah sebagai berikut :
kemudian kita buat scriptnya di pascal berdasarkan rumus tersebut :
program Binomial; uses crt ; label ulang ; var p,q,k,l,m,bino : real ; n,x,i,a,b,c,r : longint ; ab : char; begin ulang : clrscr ; textcolor(11); writeln('Program Distribusi Binomial'); Writeln('Oleh M.Andik Kurniawan'); Writeln('Nim : 11 590 035 '); textcolor(red); Writeln('=============================================');writeln; textcolor(white); Write('Masukkan Nilai n = '); readln(n); Write('Masukkan Nilai X = '); readln(x); Write('Masukkan Nilai Probabilitas p = '); readln(p); q:=1-p; r:=n-x; a:=1; b:=1; c:=1; for i:=2 to n do a:=a*i ; for i:=2 to x do b:=b*i ; for i:=2 to r do c:=c*i ; k:= a/(b*c); l:= exp(x*ln(p)); m:= exp(r*ln(q)); bino:=k*l*m; writeln;writeln; textcolor(10); Write('Distribusi Binomialnya Adalah ' , bino:0:4); readln; writeln; writeln; textcolor(yellow); write('Apakah Anda Ingin Mengulangi ( y / t) ? '); readln (ab); if (ab ='y') or (ab='Y') then begin goto ulang ; end else end.
Berikut Tampilan Scripnya di Freepascal
Script di Freepascal |
kemudian langsung saja kita Compile / jalankan
Hasil Program Bimomial |
Mudah bukan.....Okey !! segitu dulu postingan kali ini...semoga bisa bermanfaat dan dapat aplikasikan :)
Silahkan di CoPas asal disertakan sumbernya :) hehehe :p
Menang Lelang di Bhinneka.com
Hari itu Jumat 3 mei 2013 , bangun pagi langsung buka internet....yup hari itu saya libur kuliah. Bingung juga didepan PC mau ngapain,Palingan Youtube-an,sama ngaskus. Iseng-iseng buka Fb ah...sebenernya rada males,ni Fb jarang dibuka soalnya. Saya lihatin beranda sampe discroll kebawah mentok...nemu post dari Bhinneka isinya tentang lelang yang mau diadain tanggal 3 mei ini tepat jam 10 tenkkk..:)
Pengumuman Lelang Binnneka
Ketika baca post di Fb tadi langsung melek karena barang yang dilelang itu Motherborad Intel soket 1156, ...beuh tepat banget ni mobo bisa gantin motherboar VVikoo saya, Padahal Moterboard itu belum sebulan saya beli di enterkomputer jakarta. Tapi merasa gak puas karena beberapa sebab.
Ketika buka link lelangnya, terus baca peraturanya...ternyata simpel banget cuma harus daftar di forum bhinneka, klo sudah dapat ID Bhinieka baru deh dibuat posting di trit lelang tersebut. Singkat cerita Lelang pas jam 10 dibuka, barang pertama yang dilelang casing PC merek IBOS, keren juga tu casing..hehehe, iseng ikut posting sambil pantengin trit lelang lain.Tapi sayang karena harga dah melambung diatas harga keinginan saya akhirnya casing ane lepas.waktu itu bid terakhir di angka 180rb ..murah gak tu :)
Lanjut ditrit lelang lain ada Motherboard INTEL SOKET 1156 DQ57TM, awal dibuka hargnya 300rb dan kelipatan bid 20rb, saya langsung jadi penawar pertama sebesar 320rb, sejam lamanya gak ada yang nawar lagi tu mobo, udah seneng banget waktu iku saya, kayaknya ni mobo gak ada yang minat, emang sih pemakai mobo soket ini emang jauh lebih sedikit dibanding soket 1155. Singkatnya nyeletuk ada orang yang pasang harga 340rb,sialll... pikirku hehehe..saya diemin aja tu trit sampai beberapa menit sebelum hitungan terakhir, disamping saya juga memantau buat barang lain yakni memori Corsair 16Gb (4x4gb)--->mantabbbb.
Mobo soket 1156 |
Pas di beberap menit sebelum dihitungan terakhir mau gak mau saya posting di bid harga 360rb :),dan benar sampe hitungan terakhir gak ada yang nge-bid lagi dan Horeeee...Mobo intel-nya dah saya menangin :P
Lanjut di trit lelang memori, sebenenrnya saya kurang minat dengan barang ini karena harga walnya juga dah tinggi yakni 650rb dan kelipatan bid nya 50rb....tapi karena liat harga barunya yang 2jt an, saya jadi ngiler juga hehehe....Saya pantau aja tanpa posting di trit itu, sampe pada penawar terkhir sebesar 1jt saya masih mikir-mikir ,diambil gak ya ini memory, akhirnya pada bebrapa hitungan terkhir saya bid juga hehehe...sebesar 1.050.000 (1 juta lebih 50rb).Ternyata emang rizki jatuh disaya,dan sayapun menang.
RAM Corsair 16Gb |
Pihak Bhinneka akhirnya menghubungi saya untuk konfirmasi dan pembayaran barang.dan hari itu juga saya bayar kedua barang hasil menang lelang tersebut. Sebenarnya ada beberapa barang lain yang dilelang tapi karena saya gak minat saya gak ikut nawar, ada juga sebuah casing Powerlogic yang sedang dilelang sebenarnya minat tapi karena user lain ada yang menawar harga diatas saya akhirnya saya lepas hehehe.
Seru emang ikut lelang itu...ada seninya kalau orang bilang. Dan nanti kalau barang dah nyampe ditangan saya share lagi crita nya dan hasil foto penampakan barangya.Thanks Bhinneka
Update Software / Driver Mobile Partner Versi 23 Untuk Modem Huawei E182E
Berawal dari bosennya ane liat tampilan Driver Modem GSM Huawei E182E ane yang,yang bisa dibilang Cupu banget hehehe...akhirnya ane nyoba buat upgrade softwarenya.
mobile partner Versi 16 |
Setelah googling kesana kemari, akhirnya ane putusin tuk coba Update sendiri driver atau softwarenya. Dari hasil googling tadi juga diketahui bahwa versi terbaru dari mobile partner untuk saat ini yakni versi 23.xx.xx.xx (baca: versi 23 sekian..sekian...). katanya sih punya beberapa kelebihan anatara lain :
- 1. Include 4 Thema baru
- 2. Hemat ram
- 3. Built in driver terbaru untuk modem Huawei
- 4. Online update
- 5. Built in aplikasi Huawei Message+,dll.
Mobile Partner Versi 23 |
Modem E182E ane secara default udah terinstall mobile partner versi 16. Modem ini tidak memaki CD untuk instalasi drivernya, untuk drivernya sendiri sudah tertanam di modem itu, sehingga tinggal Plug n paly beres deh. Oleh Sebab itu proses Update Firmware akan berlangsung secara dua tahap yakni:
- 1. Update software didalam modem itu sediri (gunanya buat instalasi driver)
- 2. Update Mobile partner di PC
Update software didalam modem
- 1.Diskonek medemya terlebih dahulu ya jika sedang digunakan dan masukkan Modem USB jika sebelumya belum digunakan.
- 2.Extrac file yang sudah di unduh tadi,kemudian klik dua kali file EXE yang ada di disana.
- 3.Pada tampilan yang muncul kemudian pilih start,mka kemudian proses update software akan berlangsung...sabar gan...patikan koneksi USB agan seakalin bagus..biar gak terjadi hal-hal yang tak diinginkan.
Proses Update - 4.Tuggu sampe loading update selesai..setelah itu klik finish.
Update is finished - 5.Update softare didalam modem dah beres..sekarang tinggal kita install mobile partnernya versi 23 di PC.
- 1.Pertama Uinstall dulu mobile partner yang lama,gak usah diajarin kan gan :D,pasti dah pada bisa semua :D
- 2.Tancepin modem yang tadi di upadate ke USB PC atau leptop agan-agan
- 3.Proses intalasi akan berlangsung otomatis jika Autopaly di PC agan gak dimatiin,bagi yang gak bisa autoplay tinggal klik 2 kali file auto run di dalam Cd drive modem(klo di ane ada drive H).
CD drive Modem ane - 4.Silahkan ikutin proses selajutnya.tinggal klik klik tombol next aja ko :D
Proses Instalasi - 5.tunggu hingga proses instalasi selesai ,klo sudah selesai langsung klik finish.
Proses instalasi selesai - 6.Oke!!dah berhasil semua proses dah beres,waktunya nyoba mobile partner terbaru,langsung saja klik icon nya di dekstop masing-masing.
- 7.Taraaaaa...!! keren kan..silahkan diutak-atik sendiri..ada beberapa skin yang lucu dan unyu-unyu deh,jauh banget bedanya kan dari versi sebelumnya.
tamplan mobile partner yang keren :D
Test Speed test |
Update Firmware Terbaru Modem Huawei E182E
Setelah sebelumya saya mencoba memberikan tutorial untuk update driver mobile partner ke versi terbaru yakni versi 23. Maka kali ini saya akan coba kasih tutorial buat update firmware untuk Modem Huawei E182E. Update ini awalnya dikarenakan modem yang baru saya beli ini sering Unmount / Reject sendiri dari USB laptop saya, setelah gogling dan ga tau jawabnya maka saya coba beranikan diri untuk update firmwarenya. Dengan resiko masalah beres atau modem kesayangan ane matot :(
Perlu diketahuai bahwa untuk Update firmware sendiri sejatinya bertujuan untuk meningkatkan kemampuan dari modem itu sendiri, atau bisa juga untuk proses unlock modem itu sendiri.
tutorial ini mugkin juga bisa berlaku buat modem huawei tipe lainnya tinggal sesuaiin firmware yang mau di update aja.
Awal saya membeli modem E182E ini secara default sudah include versi firmware 11.831.03.00.464 (Telus), kemudian besoknya saya langsung Update keversi 11.831.06.01.464 (Telus).setelah melakukan Update ternyata benar modem yang sebelumya suka umount sendiri,sekarang normal gak ada masalah. Proses udate ke firmare versi ini modem masih tetap bisa digunakn untuk kartu /sim card indonesia (Unlocked). Tetapi jika melakukan Update ke firmare versi atasnya lagi maka nantinya akan dimintain Password atau flash code. Tapi tenang aja pada tutorial kali ini saya kan kasih tau caranya semua hehehe..baik banget kan gue :D
Pertama donlot dulu firmware yang dibutuhkan:
Okeyyy..! langsung kita mulai saja prosesnya dan seperti biasa do with your own risk...!!!
Read more
Huawei E182E Logo Telus |
tutorial ini mugkin juga bisa berlaku buat modem huawei tipe lainnya tinggal sesuaiin firmware yang mau di update aja.
Huawei E182E |
Pertama donlot dulu firmware yang dibutuhkan:
Bagi yang mau update modemnya agar speed menjadi 28.8 Mbps langsung saja donlot firmware no 2 dibawah ini,update bisa dilakukan langsung keversi 28,8Mbps tanpa melakukan update dari versi bawahnya terlebih dahulu.
- 1. Untuk firmare versi 11.831.06.01.464 (telus official) bisa download disini
- 2. Untuk firmware versi 11.865.07.00.618 (speed 28,8 Mbps) bisa di download disini
- 3. Untuk firmware versi terbaru 11.868.03.01.55 (unofficial) bisa di download disini
- 4. Download Universal Master Code disini (buat dapatin code password/flashing nanti)
Okeyyy..! langsung kita mulai saja prosesnya dan seperti biasa do with your own risk...!!!
- 1. Tarik nafas dulu gan..siapin kopi atau camilan juga boleh ... :D
- 2. Donlot semua file yang dibutuhkan ( gak pake adfly ko gan ... :D )
- 3. Disconect modem jika sedang digunkan,kemudian cabut simcardnya...dan tancepin lagi ke USB PC, jangan lupa tuk mencatat IMEI modem jika nanti dibutuhkan untuk menggenerate flashing code.
Catat IMEI dan Liat versi firmware lama - 4. Klik dua kali file updater yang telah di donlot. pada tampilan pertama lalu klik start
Eksekusi file updater Tampilan awal updater - 5. program updater akan melakukan pencarain device modem dan penguncian port yang deperlukan
Searching device - 6. tampilan selajutnya adalah ringkasan update yang akan dilaksankan,disni juga dketahui ,diport berapa modemnya,versi firmware saat ini berapa dan firmware yang akan diupdate itu versi berapa. Jika sudah mantab ingin update langsung klik next dan start berturut-turut pada tampilan selanjutnya.
Summary of Update
Warninggg!! - 7. pada tahap selanjutnya jika kita diminta melakukan pengisian paswword atau flashing code. terus dari mana kita dapat flashing codenya, caranya buka aplikasi Universal Master code, kemudian masukkan IMEI modem anda di kolom yang tersedia lalu klik generate. Copas angka yang muncul di kolom Flash dan masukkan di aplikasi upadater tadi lalu klik next.
Flashing Code - 8. Tunggu saja gan proses update sedang berlangsung...cemilannya boleh juga di makan kok ... :p
Silahkan tunggu ..update sedang dilakukan - 9. Kalau sudah selesai updatenya langsung klik finish
Yeayyyy beresss...klik Finish - 10. Buka mobile partner atau MDMA ,kalau modem gak terdeteksi cabut dan pasang lagi.silahkan dicek versi firmwarenya pastikan dah ganti ke versi yang barusan di update.
Firmware terbaru - 11. Yeayyyy....!!! akhirnya modemnya gak matot.. :D ,langsung silahkan dibuat donlot tu modem...sepuasnya.
Akhirnya Punya Blog Juga
Yeah....!! Senengnya....:D
Yup bener hari ini minggu 31 maret 2013 ane punya blog tuk kesekian kalinya....loh kok gtu??
berarti dulu-dulu dah pernah punya blog dunk??
Iya emang bener dulu pernah beberapa kali punya blog,tapi blog itu cuma buat tugas kuliah atau cuma buat blog karna iseng-iseng nyoba buat.
Trus sekarang kenapa buat lagi??
Nanya mulu sih :D,,iye-iye ane jawab sekarang ane buat blog tu karena ingin membagi aja crita hidup ane yang acak kadul ini:(..dari pada disempen sendiri mending di share..siapa tau ada manfaatnya buat orang lain.Gtu ceritanya ...:D
Eh!! engak cuma itu sih..karna sekarang ane dapat koneksi internet berlimpah ,jadi mubadzir dunk kalau gak dimanfaatin hehehe :D (padahal tiap hari koneksinya ane buat donlot mulu).
Oke! biar gak makin nglindur omongannya,lagian sekarang dah malam,langsung aja ane ngenalin diri aja lah.
karna latar belakang diatas,maka pada blog ini nantinya bakal memakai 2 logat bahasa, satunya bahasa baku (saya,anda..dsb). dan satunya lagi bahasa santai( ane,agan..).
semua ini biar yang baca jadi nyaman dan gak ngerasa kaku aja gtu..yang penting ambil enaknya aja kan ya ..:)
oke kyak gtu aja kenalannya..nanti disambung lagi di post berikutnya.
Salam Blogger...Hello world :D
Read more
Yup bener hari ini minggu 31 maret 2013 ane punya blog tuk kesekian kalinya....loh kok gtu??
berarti dulu-dulu dah pernah punya blog dunk??
Iya emang bener dulu pernah beberapa kali punya blog,tapi blog itu cuma buat tugas kuliah atau cuma buat blog karna iseng-iseng nyoba buat.
Trus sekarang kenapa buat lagi??
Nanya mulu sih :D,,iye-iye ane jawab sekarang ane buat blog tu karena ingin membagi aja crita hidup ane yang acak kadul ini:(..dari pada disempen sendiri mending di share..siapa tau ada manfaatnya buat orang lain.Gtu ceritanya ...:D
Eh!! engak cuma itu sih..karna sekarang ane dapat koneksi internet berlimpah ,jadi mubadzir dunk kalau gak dimanfaatin hehehe :D (padahal tiap hari koneksinya ane buat donlot mulu).
Oke! biar gak makin nglindur omongannya,lagian sekarang dah malam,langsung aja ane ngenalin diri aja lah.
Nama ane Sebut aja Andik ,tinggal di kota kecil di Jawa timur, Jombang tepatnya..pada ngerti Kota ane kan, tempat lahirnya eyang subur nih hehehe...bukan gan...disni kota santri gan..ada makam Presiden Gus dur.
Kerjaan ane ngnaggur sih sebenarnya..makanya ane sibukin diri dengan nulis blog ginian hehehee...:D
Hobi ane baru-baru ini suka Fotografi, Keseharian Nge-Kaskus ,Jumper Foursqure juga,terus sebagai mahasiswa di UNDAR...ane ambil Teknik Informatika..tapi ya gtu belum bisa apa-apa ane, klo cuma nulis blog gini ya bisa lah hehehe...:D
karna latar belakang diatas,maka pada blog ini nantinya bakal memakai 2 logat bahasa, satunya bahasa baku (saya,anda..dsb). dan satunya lagi bahasa santai( ane,agan..).
semua ini biar yang baca jadi nyaman dan gak ngerasa kaku aja gtu..yang penting ambil enaknya aja kan ya ..:)
oke kyak gtu aja kenalannya..nanti disambung lagi di post berikutnya.
Salam Blogger...Hello world :D
Sponsor
About Me
- Unknown