Membuat
* *
** **
*** ***
********
dst
===============
program coba;
uses crt;
var
x, y, z, n : integer;
begin
clrscr;
writeln('====== PROGRAM LOOPING =====');
writeln;writeln;
write('Banyak Deret * = ');readln(n);
for x:= 1 to n do
begin
for y:= 1 to x do
write('*');
for z:=x to 2*n-x-1 do
write(' ');
for y:=1 to x do
write('*');
writeln;
end;
writeln;writeln;
writeln('Created by Bovit Leonardo Tampubolon');
readkey;
end.
Tuesday, January 22, 2013
Subscribe to:
Post Comments (Atom)
Popular Posts
-
Entah benar atau tidak, sebaiknya bersiap-siaplah, Jangan panik, tetap tenang, dan berdoalah. Ingatlah untuk lebih banyak senyum, lebih b...
-
Berikut disajikan daftar rasio kompresi sepeda motor dan rekomendasi bahan bakar yang sesuai
-
Program Pascal
-
Mau coba tantangan. Tamatkan game flash ini. Aku uda tamat. Bisa dibuktikan http://de.trinixy.ru/pics4/20101227/games/post2.swf
-
Disini akan dibahas kiat2 dalam pergantian ban, khususnya ban sepeda motor. Ada 2 alasan utama orang mengganti ban, 1. Ban sudah ...
-
Buat yang belum punya dan mau mencari rumah seperti saya, gak salah kalau kita mencoba datang ke Pameran REI sperti judul di atas. REI Expo ...
-
Statement if else pada PHP. ============================================= Berikut script menggunakan statement if else pada PHP d...
-
Kehilangan smartphone kesayangan merupakan hal yang menyakitkan dan mengkhawatirkan. Kenapa menyakitkan? Belinya dari tabungan brooo. Kena...
-
Silahkan kunjungi laman kami di Otomotif Komputer Umum ***
-
KONSUMSI BBM KAWASAKI NINJA RR Berikut saya akan paparkan bagaimana konsumsi BBM kawasaki ninja RR yang saya gunakan. Saya menggu...
No comments:
Post a Comment