Membuat gambar ketupat pada QBASIC

LOGIKA PROGRAM :

CLS = digunakan untuk membersihkan layar.

INPUT “MASUKAN BILANGAN :”, N = digunakan untuk memasukan bilangan yang di kehendaki.

FOR I = 1 TO N

FOR A = N TO I STEP -1

PRINT “ “;

NEXT A

Artinya menentukan jumlah bilangan yang akan di proses , jika angka yang di masukan adalah 8 maka 1 sampai 8. lalu FOR A = N TO I STEP -1 berfungsi  untuk menetukan nilai A dan variabel A akan di print ,  Fungsi dari PRINT “ “; adalah mencetak spasi atau baris kosong pada baris yang terpenuhi kondisinya. NEXT A adalah melajutkan untuk mencetak A yang belum tercetak.

FOR B = 1 TO I

PRINT “*”;

NEXT B

Artinya FOR B = 1 TO I akan menentukan bilangan B yaitu 1 sampai I dan mencetak *. NEXT B adalah melanjutkan untuk mencetak B yang belum tercetak.

FOR C = 2 TO I

PRINT “*”;

NEXT C

PRINT

NEXT I

Artinya FOR C = 2 TO I akan menentukan bilangan C yaitu 2 sampai I dan mencetak *. NEXT B adalah melanjutkan untuk mencetak C yang belum tercetak. Kemudian NEXT I kembali agar mencetak I yang belum tercetak.

Selanjutnya kebalikan yang diatas :

FOR I = 1 TO N

FOR  A = I TO 0 STEP -1

PRINT “ ”;

NEXT A

Artinya menentukan jumlah bilangan yang akan di proses , angka yang di masukan adalah 8 maka 1 sampai 8. lalu FOR A = I TO 0 STEP -1 berfungsi  untuk menetukan nilai A dan variabel A akan di print , ini adalah kebalikan yang di atas. Lalu NEXT A melajutkan untuk mencetak A yang belum tercetak.

FOR B = I TO N – 1

PRINT “*”;

NEXT B

Artinya FOR B = I TO N - 1 akan menentukan bilangan B yaitu I sampai N, tapi N dikurang 1 dan mencetak *. NEXT B adalah melanjutkan untuk mencetak B yang belum tercetak.

FOR C = I TO N – 2

PRINT “*”;

NEXT C

PRINT

NEXT I

Artinya FOR C = I TO N – 2 akan menentukan bilangan C yaitu I sampai N, tapi N dikurang 2 dan mencetak *. NEXT C adalah melanjutkan untuk mencetak C yang belum tercetak.  NEXT I melanjutkan mencetak I yang belum tercetak.

END : digunakan untuk mengakhiri program.

Penjelasan : Pertama-tama saya membuat segitiga yang atasnya dulu kemudian membuat segitiga terbalik dan saat di RUN jadilah seperti ketupat. Logika yang saya jelaskan memang sulit dipahami karena saya sendiripun bingung merangkai kata-katanya agar mudah dipahami.

Untuk melihat outputnya tekan F5, dan akan muncul gambar seperti dibawah ini :