Pascal‎ > ‎

Nested FOR

Kode sumber berikut mencontohkan bagaimana mencetak tanda plus ( + ) dan tanda pagar ( # ) seperti terlihat di bawah ini.

+ # # # # # # # # #
+ + # # # # # # # #
+ + + # # # # # # #
+ + + + # # # # # #
+ + + + + # # # # #
+ + + + + + # # # #
+ + + + + + + # # #
+ + + + + + + + # #
+ + + + + + + + + #
+ + + + + + + + + +

Tahap-tahapnya terlihat, mulai dari nstdfor0.pas yang hanya menampilkan tanda  tambah sepuluh kali
+ + + + + + + + + +

nstdfor1.pas sudah dapat menampilkan tanda tambah yang berbentuk segitiga seperti dibawah ini
+
+ +
+ + +
+ + + +
+ + + + +
+ + + + + +
+ + + + + + +
+ + + + + + + +
+ + + + + + + + +
+ + + + + + + + + +

hingga nstdfor2.pas yang bisa menampilkan yang kita harapkan:
+ # # # # # # # # #
+ + # # # # # # # #
+ + + # # # # # # #
+ + + + # # # # # #
+ + + + + # # # # #
+ + + + + + # # # #
+ + + + + + + # # #
+ + + + + + + + # #
+ + + + + + + + + #
+ + + + + + + + + +



ċ
nstdfor0.pas
(0k)
Muhammad Jazman,
16 Dec 2010, 02:28
ċ
nstdfor1.pas
(0k)
Muhammad Jazman,
16 Dec 2010, 02:28
ċ
nstdfor2.pas
(0k)
Muhammad Jazman,
16 Dec 2010, 02:28
Comments