VB Script : Iteration part II

Setelah kemarin kita belajar membuat perulangan angka, sekarang kita akan belajar membuat perulangan dengan menggunakan simbol.
Kita akan membuat, sebuah persegi dan persegi panjang dengan menggunakan simbol " * ".
Maka secara otomatis, simbol * melakukan perulangan sehingga membentuk sebuah persegi dan membentuk sebuah persegi panjang, menurut inputan yang akan kita masukkan,

Script yang dibuat seperti berikut:

<script language ="vbScript">
sisi = cint(InputBox("Masukkan Ukuran Sisi"))
A = 1
                    do while A <= sisi
                        B = 1
                            do while B <= sisi
                            document.write "*"
                            B = B + 1
                            loop
                   
                    document.write "<br>"
                    A = A + 1
                loop
</script>

Semisal kita memasukkan inputan sebuah sisi persegi, yaitu 3, maka yang akan tercetak adalah
  

Kemudian, jika kita membuat persegi panjang, kita mempunyai 2 inputan yaitu Panjang dan lebar.
Script yang di jalankan adalah seperti berikut
<script language ="vbScript">
panjang = cint(InputBox("Masukkan Ukuran Panjang"))
lebar = cint(InputBox("Masukkan Ukuran Lebar"))
                A = 1
                    do while A <= lebar
                        B = 1
                            do while B <= panjang
                            document.write "*"
                            B = B + 1
                            loop
                   
                    document.write "<br>"
                    A = A + 1
                loop
</script>        

 maka jika kita memberi inputan Panjangnya 5, dan Lebarnya 3, hasil yang tercetak adalah :

Sekian dulu, dari kami,, Tunggu Episode Selanjutnya :D


~AndPri-146~