contoh program campuran turbobasic Kali ini saya akan membagikan program turbobasic dengan perintah perintah yang digabung.
Dimulai dar1 :
  1. if-else if.
    Berikut program-programnya:
    1. Program mencetak nilai
      Ketikkan pada turbo basic anda, seperti berikut:
      1. cls
      2. locate 1 : Print "*_*_*_*_*_*_*_*_*_*_*_*_*_*_"
      3. locate 2 : Print "Daftar Nilai mata pelajaran matematika"
      4. locate 3 : Print "||||\/\/\/\//\/\/\/\/\/\/\/\/\/\/\/\/\||||"
      5. locate 4 : print "NIM =";:input,nim$
      6. locate 5 : print "NAMA =";:input,nama$
      7. locate 6 : print "KELAS =";:input,kelas$
      8. locate 7 : print "JENIS KELAMIN =";:input,jenis$
      9. locate 8 : print "NAMA PENGAJAR=";:input,pengajar$
      10. locate 9 : print "SEMESTER=";:input,smt$
      11. locate 10 : print "NILAI TUGAS =";:input,NT!
      12. locate 11 : print "NILAI KUIS =";:input,NK!
      13. locate 12 : print "NILAI UTS =";:input,NU!
      14. locate 13 : print "NILAI UAS =";:input,NS!
      15. locate 14 : print "NILAI KEHADIRAN=";:input,NN!
      16. let jumlah=NT!+NK!+NU!+NS!+NN!
      17. locate 15 : print "TOTAL NILAI ANDA =";jumlah
      18. let rata=jumlah/5
      19. locate 16 : print "NILAI ANDA=";rata
      20. print "TENTANG NILAI ANDA=";rata
      21. if rata>=90 and rata <=100 then
      22. print "TENTANG NILAI ANDA= SANGAT PAHAM (A) "
      23. elseif rata >=80 and rata<=89 then
      24. print "TENTANG NILAI ANDA= PAHAM (B) "
      25. elseif rata >=70 and rata<=79 then
      26. print "TENTANG NILAI ANDA= CUKUP PAHAM (C) "
      27. elseif rata >=60 and rata <=69 then
      28. print "TENTANG NILAI ANDA= KURANG PAHAM (D) "
      29. elseif rata <60 then
      30. print "TENTANG NILAI ANDA=SANGAT KURANG PAHAM (E) "
      31. end if
      32. end

    Berikut tampilan program dalam turbo basic :



    Maap bila tampilan programnya membingungkan :D

    Berikut tampilan hasil dari program diatas :



    Itulah program turbo basic sederhana saya, untuk program lainnya silahkan ke blog saya berikutnya ya:D , terimakasih atas kunjungannya di bagian ini .

Komentar

Posting Komentar

Postingan populer dari blog ini

penggunaan GO TO dalam turbo basic

Gambar
else if lanjutan dari blog sebelumnya, disini masih membahas tentang program turbo basic menggunakan statement else if. Langsung saja kita ke TKP :D , berikut programnya : Ketikkan pada turbobasic anda : cls print "/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\" print "Data pekerja PT. ISO YOH Kota Semarang " print "Tahun 2018" print "1.AJI REHAN DWI KESATRIA B H" print "2.ALI DWI YULIANTO" print "3.BAGAS DWI KUSYITO" print "4.DEWI KARUNIA LESTARI K" print "5.ENGGAR WULAN ASRI" print "6.FERIAN NIAGA ASIA D E" print "7.GALIH RIO PURNAWAN B S" input "Masukkan nama data yang akan anda cari:";P cls on P goto 1,2,3,4,5,6,7 1: print "Nama :AJI REHAN DWI KESATRIA BAJA HITAM" print "Alamat :jl. jayawijaya no 4, Semarang" print "Mulai bekerja : 21 desember 1998" end 2: print "Nama :ALI DWI YULIANTO" print "Alamat :jl.gang baru no.7, Semaran
Baca selengkapnya
Gambar
kode warna pada turbo basic Kali ini saya akan membagikan kode warna, untuk mengubah warna tulisan pada hasil program turbo basic. Berikut kode warnanya: 01=biru tua 02=hijau 03=biru langit 04=merah 05=ungu 06=coklat 07=putih 08=abu-abu 09=biru 10=hijau muda 11=biru laut 12=merah muda 13=ungu 14=kuning 15=putih Anda dapat mengetikan seperti berikut: cls color 4 Print "color 4" Berikut tampilan programnya di turbo basic= Silahkan kalian coba masing masing kode warna diatas, dan lihat hasilnya. Demikian yang dapat saya bagikan pada halaman kali ini, sampai jumpa di halaman selanjutnya ya. </html
Baca selengkapnya
Gambar
Struktur runtutan Turbobasic Struktur runtutan dan program runtutan Struktur runtutan, merupakan sebuah pernyataan dalam sebuah program dimana perintah dijalankan dengan urutan yang telah ditentukan. Ini berarti program tersebut hanya ada sebuah cara menjalankannya yaitu dari atas (input) menuju kebawah (output) secara berurutan. Apabila disimulasikan dengan menggunakan flowchart akan menjadi seperti berikut: Dapat diambil kesimpulan struktur runtutan hanya terdapat sebuah input dan output disetiap statementnya. Berikut merupakan contoh program runtutan dalam turbobasic : Program menghitung luas persegi Ketikkan pada software turbo basic anda: CLS Input "masukkan sisi panjang=";P Input "masukkan sisi lebar=";L Let Luas=P*L Print "Lebar persegi tersebut adalah=";Luas Berikut tampilan program dan hasil pada turbo basic : Hasilnya sebagai berikut : Program menghitung bilangan berpangkat Ketikkan pada software turbo basic anda: CLS I
Baca selengkapnya