for next dan do while dalam Qbasic

berminat untuk pasang iklan diblog kami, klik pesan ini

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


Dapatkan berita-berita terbaru kami di
twitter | facebook | RSS feeds | versi mobile

-----Nostalgia 90an yuk di blognya rayi-----


Artikel Menarik Lainnya



6 komentar:


Anonim mengatakan...

sip....,

klo kasuse sprt ini gmn bozz....

print x hasilnya adalah 10, 13 ,16 ,19
x = 10
y = 3
N = 4

mohon share ilmunya yaah........

rayi dwiky putra on 3 November 2010 pukul 08.26 mengatakan...

oke saya juga baru mempelajari Qbasic ini
tolong minta outputnya dengan lengkap ya?

Unknown on 1 Maret 2015 pukul 06.08 mengatakan...

Info menarik
sewa mobil di bali
bali wisata murah
bali paket wisata
bali travel online

balidogen on 19 Maret 2015 pukul 19.48 mengatakan...

Nice blog & good info
sewa mobil di bali
bali wisata murah
bali paket wisata
bali seo
bali web design
ubud area rooms
budget room in ubud
budget hotel in ubud
bali spa
bali car rental
bali car hire
bali car rental
bali travel online

ace maxs on 6 April 2015 pukul 12.52 mengatakan...

pengen belajar tapi ga pernah ngerti....

Unknown on 4 Mei 2017 pukul 10.31 mengatakan...

Metal Bucket

Pola Hidup Sehat Untuk Penderita Sakit Asma
Rasakan Manfaat Air Rebusan Biji Semangka
Alasan Dibalik Mata Terpejam Saat Sedang Berciuman
Manfaat Bercinta di Pagi Hari Bagi Pasangan Lanjut Usia
Dampak Negatif Keseringan dan Kelamaan Bercinta

Posting Komentar

 

Arsip Blog

free counters

keripiku blog © 2008 - 2009 this design by Rayi | All Rights Reserved