Kali ini saya akan membagikan cara untuk membuat bintang berderet dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.
program bintangkecil;
uses crt;
var
i,j,n:integer;
begin
clrscr;
writeln('masukan jumlah baris');
readln(n);
for i:=0 to n do
begin
for j:=1 to i do
write('*');
writeln;
end;
readkey;
end.
Berikut screenshoot nya :