Pemakaian Seleksi Case of Pada Pascal

Sabtu, 23 Februari 2013 | 10:28 WIB | Dibaca : 5036 kali | Kategori : Prog PASCAL
Pemakaian Seleksi Case of Pada Pascal

Bahasa pemrograman PASCAL menyediakan 2 jenis seleksi dalam pemroses suatu data, yaitu IF dan CASE. Pada artikel ini akan dibahas pemakaian seleksi case of pada PASCAL.

Syntax :

    Case nmvariabel of
    nilai1...nilai2  : perintah ;
    nilai3          : perintah ;
    ....
    ....
    ....
    end;


Berikut contoh program pemakaian seleksi case of pada pascal.

uses crt ;
var
   mtk    : string[30];
   nilai  : byte ;
   ket    : string[10];
Begin
     clrscr ;
     Write('Mata Kuliah   : '); readln(mtk) ;
     Write('Nilai         : '); readln(nilai) ;
     Case nilai of
    80..100: ket:='Lulus' ;
         70..79 : ket:='Lulus' ;
         60..69 : ket:='Lulus' ;
         50..59 : ket:='Lulus' ;
         0..49  : ket:='Gagal' ;
     end;

     Write('Keterangan    : ', ket);
     readln;
end.

Demikianlah artikel pemakaian seleksi case of pada pascal . Semoga bermanfaat dan anda semakin menyukai belajar bahasa pemrograman.

Tag : Pemakaian Case of Pada Pascal, belajar bahasa pemrograman, bahasa pemrograman, bahasa pemrograman pascal, tempat download program


Bila berita ini bermanfaat silahkan share Pemakaian Seleksi Case of Pada Pascal ini dengan teman anda, Terima kasih sebelumnya

Berikan Komentar Anda Pada Berita Pemakaian Seleksi Case of Pada Pascal

Anda berada di halaman Pemakaian Seleksi Case of Pada Pascal, dan telah membaca artikel Pemakaian Seleksi Case of Pada Pascal. Artikel Pemakaian Seleksi Case of Pada Pascal bisa anda peroleh pada halaman http://www.mesran.web.id/berita-568-pemakaian-seleksi-case-of-pada-pascal.html . Anda bisa meng-COPY/PASTE artikel ini dengan meletakkan link Pemakaian Seleksi Case of Pada Pascal sebagai sumbernya.
Web Rekomendasi
Publikasi Ilmiah
 Copyright (c) 2011 - 2018 mesran.web.id