ARSIP_QBASIC

program qbasic

Output bilangan ganjil (contoh program)

logika program

CLS                       // untuk menghapus output hasil tampilan program
1,2,3,4,5,6,7          // merupakan baris program
n = 1                      // variabel n = 1
b = 2*n-1              // varibel b memproses perhitungan 2*n-1
PRINT b               // cetak hasil perhitungan variabel b (hasil pertama = 3)
IF n = 20 then 7   // jika n = 20 lalu ke baris 7
n = n+1                // jika n belum 20, maka n = n+1
GOTO 2              // looping ke baris 2
END                    // mengakhiri program