Tuesday, July 22, 2008

Logical IF in BASIC Language Program

pada pertemuan kedua kali ini kita akan mempelajari logikal if dengan menggunakan bahasa pemograman turbo basic.pada dasarnya if adalah suaru pengujian pada suatu kondisi jika kondisi itu terpenuhi maka program yang ditentukan dapat dijalankan.jika tidak dia akan melakukan pengujian dengan kondisi berbeda hingga akhir pengujian.operator penguhung dalam turbo basic antara lain "and","or","xor".seperti terlihat dibawah ini adalah tampilan setelah program dijalankan .dalam program yang akan kita buat nanti memiliki logika seperti berikut :

1. nim diinputkan tergantung dari user

2.nama dimasukkan sesuai dengan nama user

3.user memasukan nilai ujian middle /ujian tengah semester

4.uiser memasukan nilai tugas

5.user memasukan nilai quiz/ulangan harian

kemudian data diolah

6.rata-rata dicari dengan menjumalhan ketiga nilai variabel kemudian dibagi 3(jumlah variabel)

7.masuk ke pengujian if,dalam bahasa manusia pengujiannya adalah sebagai berikut

jika nilai rata-rata diantara 100 dan 80 maka

cetak di layar bahwa "ANDA MENDAPAT GRADE A"

jika nilai rata-rata diantara 80 dan 70 maka

cetak di layar bahwa "ANDA MENDAPAT GRADE B"

jika nilai rata-rata diantara 70 dan 60 maka

cetak di layar bahwa "ANDA MENDAPAT GRADE C"

jika nilai rata-rata diantara 60 dan 40 maka

cetak di layar bahwa "ANDA MENDAPAT GRADE D"

jika nilai rata-rata diantara 40 dan 0 maka

cetak di layar bahwa "MAAF, TOLONG MASUKAN DATA ANDA"

listing program/atau dalam bahasa basic adalah seperti dibawah ini :


CLS

REM RUMUS UNTUK MENGECEK NIM

INPUT "NIM :",NIM

INPUT "NAMA :",NAMA

INPUT "NILAI MIDDLE :",NILAI

INPUT "NILAI TUGAS :",TUGAS

INPUT "NILAI QUIZ :",QUIZ

RATA=(NILAI+TUGAS+QUIZ)/3

PRINT "RATA-RATA :",RATA

COLOR 12

IF RATA<=100 AND RATA>=80 THEN

PRINT "ANDA MENNDAPAT GRADE A"

ELSEIF RATA<80>=70 THEN

PRINT "ANDA MENDAPAT GRADE B"

ELSEIF RATA<70>=60 THEN

PRINT "ANDA MENDAPAT GRADE C"

ELSEIF RATA<60>=40 THEN

PRINT "ANDA MENDAPAT GRADE D"

ELSEIF RATA<40>0 THEN

PRINT "MAAF,ANDA TIDAK DAPAT MENGIKUTI UJIAN"

ELSEIF RATA=0 THEN

PRINT "MAAF, TOLONG MASUKAN DATA ANDA "

ELSE

END IF






dengan adanya percabangan/pengujian diatas maka komputer akan menguji nilai rata-rata dan memberikan pesan dilayar sesuai pengujian yang kita buat tadi.mudah bukan belajar if.pemograman itu memang menyenangkan