==============================================
Alhamdullilah aku ucapkan puji syukur kehadiran Allah yang sudah menyelesaikan tugas ku
karena tanpa pertolongannya tugasku ini tidak akan pernah selesai karna aku itu manusia yang bodoh
persis lagunya ada band.
=================================
ok. langsung saja kita lihat secript di bawah ini :
Program segitiga_bintang;
Uses Wincrt;
Var i,j,n:integer;
Begin
Writeln('Program Menampilkan Bintang');
Writeln('===========================');
Writeln;
Write('Masukkan Jumlah Baris: ');readln(n);
For i:= 1 to n do
Begin
For j:= 1 to i do
Write('*');
Writeln;
End;
End.
akan muncul Outnya seperti ini
