Saeful Kurnia - Web Blog


Masukkan kode berikut:

program segitigaSamaSisi;
uses crt;
const max=5;
var i,j,k:integer;
begin
{Segitiga sama kaki merupakan gabungan antara 
2 Tutorial sebelumnya, yaitu Buat Segitiga
di Pascal (1 & 3)}
 for i:=1 to max do begin        {1}
  for j:=max downto 1 do begin   {2}
   if j<=i then write('*')
   else write(' ');
  end;
  for k:=1 to i do write('*');   {3}
  writeln;                       {4}
 end;
 readln;                         {5}
end.


Penjelasan:
1) Statement "for" pertama merupakan sebuah statement yang digunakan untuk memberikan ukuran tinggi pada segitiga yang kita buat.
2) Statement "for" kedua merupakan sebuah segitiga sama kaki yang sikunya mengarah ke kiri.
3) Statement "for" ketiga merupakan sebuah segitiga sama kaki yang sikunya mengarah ke kanan. Pada tutorial satu kita melihat bahwa statement "for" terdiri dari "to", "do" lalu "begin" dan dakhiri "end;". Meskipun pada umumnya seperti hal tersebut, namun perlu diketahui bahwa statement "for" itu hanya terdiri sintaks "for", "to", dan "do" saja. Dan statement tersebut hanya mengeksekusi satu buah pernyataan yang diakhiri dengan ";". Pada tutorial "Buat Segitiga di Pascal Part 1" terlihat sebagai berikut:

program segitiga1;
uses crt;
const max=5;
var i,j:integer;
begin
 for i:=1 to max do begin
  for j:=1 to i do begin    { << disini}
   write('*'):
  end;
  writeln;
 end;
end.


Sebenarnya kode diatas dapat ditulis seperti berikut:

program segitiga1;
uses crt;
const max=5;
var i,j:integer;
begin
 for i:=1 to max do begin
  for j:=1 to i do write('*');   { << disini}
  writeln;
 end;
end.


4) Berfungsi untuk menambahkan line baru, setelah mengeksekusi kedua statement "for" diatas. Kenapa dibutuhkan line baru? Jika kita menggambarnya pada sebuah tabel maka akan tampak seperti berikut:

*


  
* *

 
* * *

* * * *
* * * * *

*Tabel yang menampilkan hasil eksekusi program pada tutorial "Buat Segitiga di Pascal Part 1".

Jika kita perhatikan. Yang merupakan kolom adalah statement "for" yang memerintahkan
for j:=1 to max do begin ... 
Statement tersebut merupakan perintah untuk membuat kolom seperti pada tabel. Dan statement for pertama membuat barisnya. Sehingga program akan memiliki kolom dan baris. Seperti table di atas.

5) Melakukan perintah input any key, sehingga program yang dibuat akan tampak terlebih dahulu.

*Jika menghadapi kesalahan atau pertanyaan dengan program di atas. Harap komen di bawah.

Categories: ,

2 Responses so far.

  1. Unknown says:

    kalo bentuknya kaya begini ,,gimana yah gan ..
    luarnya bintang ,dalamnya diamond ..
    mohon bantuannya gan ..

    **************
    ****** ******
    ***** *****
    **** ****
    *** ***
    ** **
    * *
    * *
    ** **
    *** ***
    **** ****
    ***** *****
    ****** ******
    **************

  2. Unknown says:
    Komentar ini telah dihapus oleh pengarang.

Leave a Reply

Berikan komentar?