Program Konversi Nilai Pada Pemrograman Pascal dengan Menggunakan Fungsi IF

Assalamu’alaikum Wr Wb

Selamat datang di web sibukngoding.com. Pada kesempatan kali ini saya akan menjelaskan contoh fungsi IF pada bahasa pemrograman pascal. Pada artikel sebelumnya telah dibahas tentang percabangan, dimana pada percabangan ada 2 fungsi yaitu IF dan Case.

Sebagai contoh Fungsi IF, pada postingan kali ini saya akan menjelaskan program konversi nilai. Untuk contoh konversinya seperti berikut ini.

Jadi seumpama kita memasukkan nilai antara 90 sampai 100 maka akan tampil tulisan nilai A. Lalu jika kita memasukkan nilai antara 80 sampai 89 akan tampil tulisan nilai B, begitu seterusnya sampai nilai dibawah 50 akan tampil tulisan Nilai E.

Untuk Source code nya, sebagai berikut:

Program Konversi_nilai;

uses crt;

var nilai: integer;

begin

clrscr;

write('Masukkan nilai : ');

readln(nilai);

if (nilai>=90) and (nilai<=100) then

write('Nilai A')

else if (nilai>=80) and (nilai<=89) then

write('Nilai B')

else if (nilai>=60) and (nilai<=79) then

write('Nilai C')

else if (nilai>=50) and (nilai<=59) then

write('Nilai D')

else if (nilai>=0) and (nilai<=49) then

write('Nilai E')

else

write('Angka tidak valid');

readkey;

end.

Dari source diatas, bisa dilihat, jika kita memasukkan nilai 60 maka hasil yang ditampilkan adalah “Nilai C” karena yang memenuhi syarat adalah aksi nomor 3 yaitu if (nilai >=60) and (nilai<=79). untuk hasil lebih jelasnya kita lihat hasil setelah di run sebagai berikut:

Demikian contoh program konversi nilai pada pascal, semoga bisa menjadi referensi bagi anda yang sedang belajar bahasa pemrograman pascal. Artikel ini saya ambil dari blog saya yang lama annur24.wordpress.com. Jika ada pertanyaan bisa ditanyakan lewat kolom komentar dan jangan lupa untuk mengunjungi web sibukngoding.com untuk contoh program lainnya

Terimakasih atas kunjungannya, selamat belajar dan jangan mudah menyerah

Wassalamu’alaikum Wr Wb