Page 113 - BAHAN_BACAAN_ALGORITMA_DAN_PEMOGRAMAN
P. 113

Struktur REPEAT

                   Bentuk umum :
                      repeat
                             aksi
                      until kondisi


                            Notasi  ini  mendasarkan  pengulangan  pada  kondisi  boolean.

                   Aksi di dalam badan kalang diulang samopai kondisi boolean bernilai

                   true. Dengan kata lain, jika kondisi boolean masih false, pengulangan
                   masih terus dilakukan. Karena proses pengulangan suatu saat harus

                   berhenti,  maka  di  dalam  badan  pengulangan  harus  ada  aksi  yang
                   mengubah nilai peubah kondisi.

                            Struktur REPEAT memiliki makna yang sama dengan WHILE,

                   dan  dalam  beberapa  masalah  kedua  struktur  tersebut  komplemen
                   satu sama lain.

                   Contoh analisa :

                   Algoritma  dan  program  untuk  menghitung  jumlah  angka  dari  1
                   sampai N. Nilai N dibaca dari papan kunci. Misalnya N = 5, maka 1 +

                   2 + 3 + 4 + 5 = 15.


                      Algoritma PENJUMLAHAN_DERET;
                      { menjumlahkan deret
                                     1 + 2 + 3 + ... + N
                      dengan N adalah bilangan bulat positif yang dibaca dari piranti
                      masukan. jumlah deret dicetek ke piranti keluaran. }


                      DEKLARASI
                         N, k, jumlah : integer;


                      DESKRIPSI
                           read(N)          {banyaknya suku deret}
                           jumlah←0          { inisialisasi jumlah deret }
                           k←1              { suku deret yang pertama }
                           repeat
                                 jumlah←jumlah + k          {jumlah deret sekarang}
                                 k←k+1                      {suku deret berikutnya}
                           until k > N
                           write(jumlah)
   108   109   110   111   112   113   114   115   116   117   118