Jannah Theme License is not validated, Go to the theme options page to validate the license, You need a single license for each domain name.
Pascal

Array Pascal Bag VI (Array Konstan) #72

Lampu merah akan menyala warna merah

andrypein.net : Sekarang kita lanjut lagi pascal2annya, kali ini bagian ke 6 mengenai array konstan.

Maksud dari array konstan adalah nilai yang terkandung di dalam sebuah array selalu bernilai konstan, artinya nilai-nilai tersebut tidak dapat diubah .

Untuk mendeklarasikan array konstan kita harus menggunakan kata kunci const.

Berikut adalah bentuk umumnya :

const
 NamaArray : array[indeksAwal..IndeksAkhir] of tipe_data = (nilai1,nilai2, ...);

Perlu diperhatikan bahwa nilai konstan yang dituliskan diatas harus sesuai dengan banyaknya elemen array yang didefinisikan.

Sebagai contoh,apabila kita ingin mendeklarasikan array dengan jumlah elemen 5,maka nilai konstan yang diisikan pun haruslah berjumlah 5.

Contohnya seperti ini :

const
 A: array[1..5] of char =('A','B','C','D','E');

Oleh karena array A diatas bersifat konstan, maka kita tidak dapat mengubah nilainya dengan nilai yang lain.

Deskripsinya seperti ini :

A[1]:='V'; {SALAH,karena elemen A[1] selalu bernilai 'A'}
A[2]:='W'; {SALAH,karena elemen A[2] selalu bernilai 'B'}
A[3]:='X'; {SALAH,karena elemen A[3] selalu bernilai 'C'}
A[4]:='Y'; {SALAH,karena elemen A[4] selalu bernilai 'D'}
A[5]:='Z'; {SALAH,karena elemen A[5] selalu bernilai 'E'}

Hal ini menunjukan bahwa array konstan nilainya hanya dapat dibaca,namun tidak untuk diubah.

Dan untuk contoh program nya seperti ini :

program ArrayKonstan;
uses wincrt;
const
BULAN : array[1..12] of string =
('Januari','Februari','Maret','April','Mei','Juni',
'Juli','Agustus','September','Oktober',
'November','Desember');
var
 noBulan : integer;
begin
 write('Masukan nomor bulan : ');readln(noBulan);
 write('Nama bulan ke-', noBulan,' adalah',BULAN[noBulan]);
end.

Maka output hasil dari program di atas adalah

Masukan nomor Bulan : 9
Nama bulan ke-9 adalah September

Sekian dulu gan tulisan array konstan nya dan semoga bermanfaat

*AFK

Related Articles

10 Comments

  1. gan ,wa baru belajar tentang pascal. neeh

    bingung gan gmna bentukan datanya misalkan saya memasukan sebuah nama dan akan keluar hasil dengan variabel char juga…

    misalkan saya memasukan sebuah nama >tito< maka apabila saya masukan nama tito maka akan keluar tulisan "orangnya baik" hhe..

    bisa d buatin contoh programnya gak yang begituan

    1. kalo gitu berarti tipe datanya bukan char gan tapi pake string,
      kira2 kaya gini gan

      program answer;
      uses wincrt;
      var
      i:integer;
      nama:string;
      const
      cek : array [1..3] of string = ('orangnya baik','orangnya jahat','orangnya nakal');
      begin
      write('siapa nama kamu? ');readln(nama);
      write('pilih nomor dari 1-3 ');readln(i);
      writeln('nama kamu adalah ',nama,' yang ',cek[i]);
      end.

  2. gini gan kalo ane masukin huruf A nanti yang keluar Anoa gitu gan bisa ga??? misal outputnya begini :
    Masukkan nama hewan : A
    Hewan A adalah : Anoa

    gitu gan plis ya bantuin hehheehhe

  3. @Andry Fadrie Kuswandani terus jawabannya gimane gan??? ane masih newbie nih hehehe maklum ya kalo :palu banyak nanya ane kasih :toast hehehe

  4. @Andry Fadrie Kuswandani algoritmanya aja deh gan kalo agan baik ya sekalian jadi :ngakak :duathumb makasih gan heuheuheu

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Back to top button