DO WHILE - LOOP WHILE

 

CLS

RANDOMIZE TIMER
Sayi = INT(RND * 10)
Kez = 1

DO

INPUT "Tuttugum Sayiyi Bil Bakalim (1-10)"; Girilen

DO WHILE (Girilen > 0 AND Girilen < 10)


    IF Girilen = Sayi THEN
   
        PRINT "Bravo"; Kez; ". tahmininizde buldunuz"

        EXIT DO
   
        ELSEIF Kez > 10 THEN
       
                PRINT "10 Tahminde Bilemediniz"
                EXIT DO
    END IF


    IF Girilen > Sayi THEN PRINT "Daha Kucuk Gir" ELSE PRINT "Daha Buyuk Gir"
   
    Kez = Kez + 1
   
    Girilen = 100

LOOP

LOOP WHILE Girilen <> Sayi
 

 

DO WHILELOOP WHILE

DO WHILELOOP WHILE

Şifreli Giriş


CLS
RANDOMIZE TIMER

DO
 
    Renk = RND * 15: COLOR , Renk: CLS
    INPUT "Sifre Nedir"; Sifre$

LOOP WHILE (Sifre$ <> "1453")

 

DO WHILE - LOOP WHILE

 

 


BasaDon:

CLS


LOCATE 20, 30: INPUT "Koordinat Giriniz"; x, y


IF x > 300 THEN

        PRINT "x Degeri 300 den kucuk olmali"

        GOTO BasaDon
END IF

IF y > 200 THEN

        PRINT "y Degeri 200 den kucuk olmali"

        GOTO BasaDon
END IF


LOCATE x, y: PRINT CHR$(219) + CHR$(219) + CHR$(219)


DO WHILE INKEY$ = ""  'Bir tusa basilmasini bekle
LOOP


GOTO BasaDon

 

 

 

DO WHILE - LOOP WHILE

20,656 Okunma Henüz yorum yapılmamış 13/10/2009 21:30:11

Yorumunuzu Ekleyin
Görsel Liste


SELECT CASE Uygulaması
SELECT CASE Uygulaması

Direnç Renk Kodları

19,815

IF BLOK YAPILARI
IF BLOK YAPILARI

18,623

ELSEIF Kullanımı
ELSEIF Kullanımı

19,737

SELECT CASE Uygulaması
SELECT CASE Uygulaması

21,570

Çaprım Tablosu Uygulaması
Çaprım Tablosu Uygulaması

19,376

INPUT Komutu
INPUT Komutu

20,142

IF Blok Yapıları
IF Blok Yapıları

END IF nerelerde kullanılır?

21,034

FOR NEXT Döngülerine Giriş
FOR NEXT Döngülerine Giriş

26,663

DO LOOP Döngüsü
DO LOOP Döngüsü

21,475

QBasic ile Yapılmış Sayı Tahmin Oyunu
QBasic ile Yapılmış Sayı Tahmin Oyunu

27,885

Basic ve Diziler
Basic ve Diziler

Tek Boyutlu Dizi Uygulama Örnekleri

20,210

DO - LOOP Uygulamaları
DO - LOOP Uygulamaları

SELECT CASE, DO-WHILE, DO LOOP

20,695

Şifreli Giriş Uygulaması
Şifreli Giriş Uygulaması

Yönetici için XYZGünAySaat şeklinde özel şifresi olan

19,193

Basic ve Diziler
Basic ve Diziler

Çok Boyutlu Dizi Uygulama Örnekleri

21,599

Qbasic ve Çok Boyutlu Diziler
Qbasic ve Çok Boyutlu Diziler

Çok Boyutlu Dizilerle İlgili Uygulamalar

22,535

SUB Subroutine Kullanımı
SUB Subroutine Kullanımı

Alt Program Kullanımı

20,133

GOSUB Kullanımı
GOSUB Kullanımı

19,615

FUNCTION Kullanımı
FUNCTION Kullanımı

21,455

Yükleniyor...
    Yükleniyor...