Contoh Codingan Qbasic dan SS nya (Newbie)

Hari selasa kemarin dikasih tugas bikin program merubah derajat fahrenhait ke derajat celcius dan reamur pake READ DATA.  Tapi sampe sekarang gw belom bisa buatnya yg gw  cuma bisa yang kaya gini nie codinganya

CLS
DIM e AS INTEGER
LOCATE 3, 35
PRINT "MENU"
LOCATE 4, 20
PRINT "1.  MERUBAH DERAJAT"
LOCATE 5, 20
PRINT "2.  MENGHITUNG LUAS DAN JARI-JARI LINGKARAN LUAR SEGITIGA"
LOCATE 6, 20
PRINT "3. EXIT"
INPUT "Pilih Nomornya=",e

SELECT CASE e
CASE 1
DIM  Fahrenhait AS STRING, Celcius AS STRING, Reamur AS STRING
INPUT "Fahrenhait = ",F
C = (F-32)/1.8
R = ( F-32)/2.25
PRINT "Celcius: ",C
PRINT "Reamur : ",R

CASE 2
INPUT " SISI PERTAMA =",x
INPUT "SISI KEDUA=", y
INPUT "SISI KETIGA=",Z

t = (y ^ 2) - ((1/2)*z)^2
t = t ^ (1/2)
a = z
l = a * t / 2
r = x * y * z / (4*l)
ll = 3.14 * r ^ 2

PRINT  "TINGGI SEGITIGA : ", t
PRINT  "ALAS SEGITIGA : ",a
PRINT  "Luas Segitiga : ", l
PRINT  "Jari Jari Lingkaran : ", r
PRINT  "Luas Lingkaran : ",ll

CASE 3
GOTO 500
End Select
500
END

nie SS buat hasilnya

contoh gambar menunya nie,,

Contoh menu nomor .1

tanda panah : silahkan masukin nilai fahrenheitnya contoh disini 1 fahrenhait maka akan keluar konversi nilai ke celcius dan reamur.

Contoh Menu no .2

Tanda panah :  Silahkan masukin ke tiga sisi segitiganya dulu, nanti akan keluar outputan hasil nya.

udah sekian dulu nie, 

wassalamualaikum,,,,

Read More

KRL EKONOMI (Jakarta Kota - Bogor/Jakarta Kota-Tanah Abang))

KRL Ekonomi tujuan Jakarta Kota - Bogor atau KRL Ekonomi tujuan Tanah Abang - Bogor adalah kereta yang mempunyai penumpang paling banyak dari kereta listrik lainya seperti Commutter Line dengan tujuan yang sama. KRL Ekonomi juga sebuah benda dimana kereta ini memiliki sebuah kekurangan dan juga kelebihan. Berikut diantara nya kekurangan dan kelebihan KRL Ekonomi tujuan Jakarta Kota-Bogor atau Jakarta Kota - Tanah Abang.

Tiket Murah
Dijaman serba mahal ini pastinya semua orang ingin menghemat uangnya sebaik mungkin. Nah, maka dari itu KRL Ekonomi ini menjadi pilihan bukan hanya dari kalangan bawah sampai kalangan atas.  Padahal pihak KAI sudah memberikan slogan yang terpampang di stasiun-stasiun bahwa KRL Ekonomi hanya untuk orang yang tidak mampu. Dan faktor lainya adalah perbedaan jauh harga tiket KRL ekonomi dengan  KRL Commuter line.  Kini perbedaanya semakin jauh dengan berlakunya kenaikan harga tiket KRL Commutter line pada tanggal 1 Okteber lalu. Kini perbandingan harganya mencapai 4 kali lipat.  KRL Ekonomi dengan harga Rp. 1500 - Rp. 2000 sedangkan Commutter line Rp. 8000-9000.  Padahal ketika over passanger atau kelebihan penumpang kualitas nya sangatlah tidak jauh berbeda.

Hiburan
Banyak sekali hiburan yang dapat kita temui di KRL Ekonomi jurusan Bogor-Jakarta atau sebaliknya.  Ada jajanan-jajanan murah, pengamen, dan juga terkadang ada atraksi-atraksi yang unik banget.  Nah tapi kita juga harus siap-siap nyiapin uang receh untuk bersedekah buat mereka(pengamen atau yg lainya) karena apa yang mereka lakukan tanpa sadar telah membuat kita terhibur.  Uang receh juga bisa digunain contohnya bila kita haus, yah kita beli aqua atau minuman lainya bisa kok di KRL Ekonomi karena banyak yang jualan.  Kalo Commutter line mana ada hiburanya.  Betul kan?

Banyak Copet, Jambret dan Sejenisnya
Copet atau jambret biasanya banyak banget di KRL Ekonomi, nah disini kelemahanya KRL Ekonomi.  Kenapa lebih banyak di KRL Ekonomi? karena KRL Ekonomi bisa dinaikkin gratis dan petugas di dalam keretanya gak ada.  Gak kaya commutter line yang petugasnya selalu nagih karcis para penumpangnya.  Copet jadi males juga kalo harus bayar.  Iya kan?  Nah ada tips nya biar gak kecopetan di KRL Ekonomi nie pemirsa. Berikut tips-tips nya:
1.  Naik di gerbong tengah, jangan di gerbong depan/belakang.  Karena para copet kalo digerbong depan/ belakang copet gampang kabur kalo ketahuan.  Itu membuat copet susah dikejar oleh kita.
2.  Simpan barang" di tas, lalu dikekepin tasnya pake kedua tangan.
3.  Fokus pada barang-barang berharga ketika berada di kereta

Read More