Pascal : Source Code Program Segitiga Bawah Bintang

Kali ini Faro membagi source code pascal untuk membuat program segitiga bintang. copy paste kode berikut di program dev pascal.

program segitigabintang;
uses crt;
var
i,j,k:integer;
begin
write('masukkan banyak baris : '); readln(k);
for i:=1 to k do
begin
for j:=1 to k do
if j<=i then write('*');
writeln;
end;
readln;
end.

output :

Semoga artikel ini bermanfaat.

Post link : http://www.blognafaro.com/2013/10/pascal-source-code-program-segitiga-bawah-bintang.html

Pascal : Source Code Program Segitiga Bawah Bintang

Ringkasan : Kali ini Faro membagi source code pascal untuk membuat program segitiga bintang. .
Jumlah Kata : | Dipublikasikan pada Wednesday, October 16, 2013