Program mengonversi angka menjadi nama hari

Berikut merupakan Program untuk Mengonversi angka menjadi nama hari menggunakan bahasa Pascal dengan menggunakan statement CASE OF.

• SOURCE CODE

Program mengonversi_angka_menjadi_nama_hari;
uses crt;
var
   pilih : integer;
begin
clrscr;
     write('input hari ke : ');readln(pilih);
     case pilih of
        1:writeln('senin');
        2:writeln('selasa');
        3:writeln('rabu');
        4:writeln('kamis');
        5:writeln('jumat');
        6:writeln('sabtu');
        7:writeln('minggu');
    end;
readkey;
end.

• PENJELASAN SOURCE CODE

Program mengonversi_angka_menjadi_nama_hari;     {Judul Program}
uses crt;     {Deklarasi unit CRT}
var     {Variabel}
   pilih : integer;     {Inisiasi variabel}
begin     {Awal instruksi prgram}
clrscr;     {Membersihkan layar}
     write('input hari ke : ');     {Cetak input hari ke}
     readln(pilih);     {Baca variabel pilih}
     case pilih of     {Jika kasus input ? = pilih maka akan}
        1:writeln('senin');     {pilih = 1 Cetak senin}
        2:writeln('selasa');     {pilih = 2 Cetak selasa}
        3:writeln('rabu');     {pilih = 3 Cetak rabu}
        4:writeln('kamis');     {pilih = 4 Cetak kamis}
        5:writeln('jumat');     {pilih = 5 Cetak jumat}
        6:writeln('sabtu');     {pilih = 6 Cetak sabtu}
        7: writeln('minggu');     {pilih = 6 Cetak minggu}
     end;     {Akhir instruksi kondisi}
readkey;     {Instruksi untuk menunggu}
end.     {Akhir instruksi program}

• PRINT SCREEN OUTPUT

Untuk mempermuda anda dalam mempelajari pemograman dengan menggunakan bahasa Pascal, admin telah menyediakan file Source code, Penjelasan source code, Output program, Flowchart dari source code, serta file pascalnya. Anda dapat mendownloadnya secara gratis di link donwload di bawah ini.

• Title Program           : Mengonversi angka menjadi nama hari
• Source Code .pdf      : .:_Download_:.
• Flowchart .png         : .:_Download_:.
• Program .pas            : .:_Download_:.
• Password                  : kamuspascal.blogspot.com

Jika anda tidak tahu bagaimana cara mendownload file-file di atas klik Disini, untuk mempelajarinya.