Page 140 - BAHAN_BACAAN_ALGORITMA_DAN_PEMOGRAMAN
P. 140

Karena  panjang  dari  String  ini  berupa  nilai  karakter,  untuk

                   mendapatkan dalam bentuk nilai numeric, maka dapat dipergunakan
                   Fungsi Standar Ord sebagai berikut :

                   Ord(X[0]) := 4;

                   Contoh :
                   Var

                          I : Word;

                          Nama : String;
                   Begin

                          Write(‘Nama Anda ?’);Readln(Nama);
                          Writeln

                          Writeln(‘Nama Anda Kalau Dibaca Terbalik Adalah :’);

                          For I := Ord(Nama[0] Downto 1 Do
                                 Write(Nama[I]);

                   End.


                   Output :

                   Nama Anda : Aryanto
                   Nama Anda Kalau Dibaca Terbalik Adalah :

                   Otnayra



                     Larik Dimensi Banyak
                       Larik dapat juga berdimensi lebih dari satu yang disebut dengan

                       Larik  Dimensi  Banyak  (Multidimensional  Array),  yang  dapat
                       berdimensi  dua  (Two  Dimensional  Array),  berdimensi  Tiga  (Three

                       Dimensional Array) dan seterusnya.

                       Pada pembahasan ini hanya akan dibahas Larik 2 Dimensi. Larik
                       2 Dimensi mewakili suatu bentuk tabel atau Matrik, yaitu Indeks

                       yang pertama dapat menunjukkan Baris dan Indeks Kedua dapat

                       menunjukkan Kolom dari Tabel atau Matrik. Bentuk Larik dimensi
                       2 berupa :

                          Nama Larik = Array[Tipe Indeks1, Tipe Indeks2] Of Tipe Larik
   135   136   137   138   139   140   141   142   143   144   145