for next dan do while dalam Qbasic

ini pembelajaran terakhir saya di Qbasic ini
kali ini saya ada beberapa contoh for next dan do while
semoga bisa membantu kamu dalam pembelajaran ya!
sebelumnya download dulu programnya DISINI

1. program pertama menggunakan   DO WHILE
dengan output

1
12
123
12
1

dengan formula

CLS 
a = 1
do while a < 4
do while b < a
b =  b + 1
print b;
loop
print
a = a + 1
b = 0
loop
a = a - 1
b = 0
for c = a to 1 step -1
for e = 1 to c-1
print e;
next e
print ""
next c
end

LOGIKA

CLS (Clean Screen), untuk menghapus layar dari tampilan yang sebelumnya

a = 1 data yang dimasukan adalah 1

Perintah Do While (mengerjakan perulangan selama

kondisi masih terpenuhi) seperti a < 4 artinya nilai a harus kurang dari 4

serta b < a yang artinya sama b kurang dari a

hasil dari b yaitu ditambah dari b itu sendiri +1

lalu di print (cetak)

loop (pengulangan) hasil tadi diulang

lalu print (cetak)

a= a + 1 artinya a akan ditambah +1 agar outputnya nanti bertambah +1

b = 0

lalu diulang dengan loop

a= a - 1 sama seperti a = a+ 1 hanya saka dikurang 1 agar outputnya berkurang -1

b = 0

untuk c = a to 1 step -1

akan diulang sampai c sampai lebih besar dari 1 lalu step -1 (dikurangi -1)

untuk e sampai lebih besar dari c serta hasil dikurangi -1

lalu e di print

dan akan diulangi terus sampai hasil pun dapat dengan perintah next e serta next c

serta diakhiri dengan end

2. program dengan for next

 

 

LOGIKA

CLS (Clean Screen), untuk menghapus layar dari tampilan yang sebelumnya

a = 4 data yang didapat adalah 4

untuk b  lebih besar dari 1 dan dikurangi -1

untuk c lebih besar dari 1 serta dikurangi -1

print (cetak) hasil c

nanti hasil output akan

54321

4321

lalu next c untuk pengulangannya

dan print serta next b untuk pengulangan b

dan akhiri dengan end