pascal 1

Tugas:

      Buatlah Program dengan tampilan

55555

4444

333

22

1

 

Logika :

Uses crt                                                 : Digunakan untuk mengaktifkan output monitor

Begin                                                     : Digunakan untuk memulai melakukan coding atau program

CLRSCR                                              : Digunakan untuk membersihkan layar

Var d,p,bil:integer                                   : mendeklarasikan variable d,p,bil menggunakan jenis data integer

Bil := 5                                                   : variabel bil merupakan 5

For d := bil downto 1 do                         : Pada Perulangan Variabel d adalah didapat dari variabel bil turun  sampai 1

For p := d downto 1 do                         : pada perulangan variabel p adalah didapat dari variabel d turun sampai 1

Write (d)                                              : mencetak variabel d

Writeln;                                                : mencetak semua perintah

End;                                                     : mengakhiri perintah kedua

Readln;                                                 : membaca semua program

End.                                                     : mengakhiri program

HASIL