Program Segitiga Angka dengan Pascal | SinfoKita

Program segitiga angka. Bagi kebanyakan mahasiswa ilmu komputer, teknik informatika, maupun sistem informasi, besar kemungkinan bahwa pascal adalah bahsa pemrograman pertama yang Anda pelajari. Pascal memiliki aturan pemrograman yang terstruktur sehingga cocok digunakan untuk mempelajari algoritma dan pemrograman komputer, terutama untuk pemula. Pascal juga bahasa pemorograman yang digunakan dalam Olimpiade Sains Nasional di bidang komputer.

Jika teman-teman ingin mempelajari algoritma dan pemrograman komputer dari dasar, maka Pascal adalah bahassa pemrograman yang tepat. Oleh karena itu, Sinfokita ingin membagikan tutorial belajar bahasa pemrograman pascal yang ditujukan untuk para pemula.

Dalam postingan ini, Sinfokita akan membagikan source code berupa program segitiga angka untuk para pemula, yang biasanya program ini sering digunakan dosen dalam mengajar para mahasiswa. Oke tanpa basa basi lagi, langsung saja ini dia programnya.

PROGRAM SEGITIGA_ANGKA;

USES CRT;

VAR

N,I,J,BIL  : INTEGER;

   

BEGIN

   CLRSCR;

   WRITE('MASUKKAN BANYAK BARIS: '); READLN(N);

   WRITELN;

   

FOR I:= 1 TO N DO

BEGIN

    FOR J:= 1 TO N-I DO

    WRITE(' ');

          FOR BIL:= 1 TO I DO

          WRITE(BIL);

            FOR BIL:= I-1 DOWNTO 1 DO

            WRITE(BIL);

            WRITELN;

       END;

  READLN;

  END.

Hasil dari program diatas  :

    1

  121

12321

(Tergantung dari banyaknya baris yang dimasukkan)

Demikian share program segitiga angka dengan pascal dari Sinfokita. Sinfokita akan terus membagikan dan men-share program-program pascal, yang tentunya akan sangat  bermanfaat bagi teman-teman semua. Selamat mengerjakan tugas.