IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- Programlama (https://www.ircforumlari.net/programlama/)

- - Quick-Basic Adına Tüm Konular (https://www.ircforumlari.net/programlama/719822-quick-basic-adina-tum-konular.html)

Kaf_Dağı

22 Aralık 2015 11:02

Quick-Basic Adına Tüm Konular

Quick-Basic Adına Tüm Konular

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Quick ve Basic adına tüm arkadaşların faydalanabileceği bir konu olup her konu ayrı ayrı anlatım şeklinde olacaktır.

Quick-Basic Adı altında olan tüm başlıklar şu şekildedir;

Bölüm 1 : QuickBasic'e Giriş
Konu İçerikleri;
BASIC nedir?
QuickBasic editörünün kullanımı
Qbasicde satır numaraları
PRINT yerine ? (soru işareti)
Qbasicde yardım almak

Bölüm 2: Qbasicde Veri Tipleri
Konu İçerikleri;
Qbasicde Veri Tipleri
Veri tipleri nasıl kullanılır?
Data tipi kullanımının bir başka yol
Kullanıcı tanımlı Veri Tipleri

Bölüm 3: CLS , INPUT ve PRINT
Konu İçerikleri;
CLS komutu
Değişkenlere Veri aktarmak
INPUT Komutu
PRINT Komut
Uygulamalar

Bölüm 4: Kontrol blokları
Konu İçerikleri;
IF ... THEN ... ELSE
İç içe IF
Mantıksal karşılaştırmalar
ELSEIF, SELECT CASE

Bölüm 5: Döngüler
Konu İçerikleri;
GOTO döngüsü
FOR & NEXT döngüsü
DO & LOOP döngüsü
WHILE ... WEND döngüsü

Bölüm 6: Diziler
Konu İçerikleri;
Dizi tanımlama
OPTION BASE, LBOUND, UBOUND
Çok boyutlu değişken tanımlama
REDIM, ERASE

Bölüm 7: Goto, Gosub, Sub, Function
Konu İçerikleri;
GOTO
GOSUB
SUB
FUNCTION
STATIC, SHARED, COMMON

Bölüm 8: Karakterlerle ilgili işlemler
Konu İçerikleri ;
PRINT
PRINT USING
STR$
VAL
STRING$
SPACE$
ASC
CHR$
HEX$ , OCT$
INKEY$
LCASE$ , UCASE$
LEFT$ , RIGHT$ , MID$
LEN
LTRIM$ , RTRIM$

Bölüm 9: Rakamlarla ilgili işlemler
Konu İçerikleri;
ABS
INT
FIX
RANDOMIZE
RND
DÖNÜŞTÜRME FONKSİYONLARI
MATEMATİKSEL FONKSİYONLAR
LEN , ASC, VAL

Bölüm 10: Dosya İşlemleri-1
Konu İçerikleri;
OPEN
Sıralı Erişimli Dosya Oluşturma ve Yazma
Sıralı Erişimli Dosyadan Okuma
Satır Satır okuma
Dosyaya Ekleme Yapma
UYGULAMA

Bölüm 11: Dosya İşlemleri-2
Konu İçerikleri ;
Rasgele Erişimli(RANDOM) Dosya Oluşturma
Rasgele Erişimli Dosyaya Yazma
Rasgele Erişimli Dosyadan Okuma

Bölüm 12: Dosya işlemleri-3
Konu İçerikleri;
Binary(ikili) Dosya Oluşturma ve Yazma.
Binary Dosya Okuma
Okuma ya da yazma konumu

Dosyalama İşlemi Uzun olduğundan 3 bölüm üzerinden anlatım olacaktır.

Bölüm 13: UYGULAMA
Uygulama İçerikleri ;

Dosyayı Silme
Dosya adını değiştirme
Konum değiştirme
Klasördeki Dosyaların Listesi..
Yeni Klasör Oluşturma
Klasörü Silme
Dosya Kopyalama.

Tüm anlatılmış olan konuların uygulamalarını bu bölümde göreceksiniz arkadaşlar...

Kaf_Dağı

22 Aralık 2015 11:07

Cevap: Quick-Basic Adına Tüm Konular

Bölüm 1 : QuickBasic'e Giriş

BASIC nedir?
BASIC kelimesi Beginners All-Purpose Symbolic Instruction Code kelimelerinin baş
harflerinden oluşmuş bir kelimedir. Genel amaçlı yeni başlayanlar için bir programlama dilidir.
Öğrenmesi kolay, yüksek seviyeli bir dildir. Basic kodları bir derleyici ile çalıştırılabilir(.EXE) ye
dönüştürülebilir.

QuickBasic editörünün kullanımı
QuickBasic paketini bilgisayarınıza kurduğunuzda ; dos komut satırında

Kod:

QB

yazıp ENTER'e bastığınızda karşınıza basic programınızı yazmanız için bir editör programı
yükler. Dos un EDIT ine benzer özelliklere sahiptir. Basic programınız yazdıktan sonra F5 tuşu
ile çalıştırabilirsiniz. Programın çalışması bitince herhangi bir tuşa basarak, program hala
çalışıyorsa CTRL-PAUSE tuşlarına basarak programın çalışmasını durdurup editöre
dönebilirsiniz.

Not: QBASIC kullananlar komut satırında QBASIC yazarak çalıştıracaklar.

UYGULAMA:
dos komut satırında qb yazıp enter tuşuna basarak qbasic editörünü çalıştırın. Aşağıdaki
resimde olduğu gibi editöre yazın.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Klavyeden F5 tuşuna basarak yazdığımız basic kodunun çalışmasını sağlayın. Bir problemle
karşılaşmazsanız ekranındaki yazılar temizlenecek ve ekranın ilk satırında

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

yazacak. Editör ekranına dönmek için herhangi bir tuşa basın.

Not: ' (ayırma) işaretinden sonra yazılanlar açıklama içindir, yazılmasa da olur.

Kaf_Dağı

22 Aralık 2015 11:14

Cevap: Quick-Basic Adına Tüm Konular

Qbasicde satır numaraları

Satır numaraları gereksizdir. Ama kullanabilirsiniz de. Kullanırsanız; numaraların birbirini takip
etmesi şart değildir. QBasicde satır numaraları yerine okunurluğu kolaylaştırması için ETİKET
kullanılır. Etiketi de sadece GOTO veya GOSUB ile gidilecek satırlara koymak yeterlidir.

Kod:

10 A = A + 1

20 IF A > 20 THEN GOTO 50

30 PRINT A

40 GOTO 10

50 END

Yukarıdaki program kodları yerine; aynı işi yapan, satır numarası vermeden, etiket kullanarak
yazılmış hali aşağıda.

Kod:

basla:

A = A + 1

IF A > 20 THEN GOTO bitis

PRINT A

GOTO basla

bitis:

END

Bir satırda birden fazla komut da kullanılabilir. İki komutu ayırmak için : (2 nokta üst üste)
kullanılır

Kod:

CLS

PRINT "QBASIC"

PRINT "MERHABA DÜNYA !"

Üstteki ile alttaki kodlar aynı işi yapar. Farkı yoktur.

Kod:

CLS : PRINT "QBASIC" : PRINT "MERHABA DÜNYA !"

Kaf_Dağı

22 Aralık 2015 11:15

Cevap: Quick-Basic Adına Tüm Konular

PRINT yerine ? (soru işareti)

Kod:

? "Merhaba Dünya !"

PRINT "Merhaba Dünya !"

Yukarıdaki iki satır aynı işi yapar. Yazarken ? işareti PRINT komutuna dönüşür. Bundan sonra
eminim ki ? işaretini PRINT e tercih edeceksiniz.

Kaf_Dağı

22 Aralık 2015 11:15

Cevap: Quick-Basic Adına Tüm Konular

Bölüm 2: Qbasicde Veri Tipleri

Qbasicde INTEGER, SINGLE, DOUBLE gibi veri tipleri vardır. Veriler belleğe saklanmadan
önce bellekte ne kadar yer kaplayacağını belirtmek için kullanılır. Değişkenin içeriği ancak bu
şekilde bellekte düzenli bir şekilde yerleşir.

Örnek

Kod:

A% = 126

A değişkenin yanındaki % işareti değişkenin bir INTEGER veri tipine sahip olduğunu gösteriri.
Ona aktarılan bilgi bellekte 2 karakterlik yer kaplar.

Değişkenlerin veri tipini tanımlamak şart değildir. O zaman tanımlanmamış değişkenler basic
tarafından SINGLE olarak kabul edilir.

Kaf_Dağı

22 Aralık 2015 11:21

Cevap: Quick-Basic Adına Tüm Konular

Qbasicde Veri Tipleri

Qbasic diğer dillerdeki gibi tüm veri tiplerini kullanmanıza imkan vermez, fakat genellikle
diğerlerine ihtiyaç duymayacaksınız. Qbasic ile kullanabileceğiniz veri tipleri INTEGER, LONG,
SINGLE, DOUBLE ve STRING dir.

Daha detaylı bilgi almak için menüden HELP/Contents 'i ve
çıkan ekranda Data Types i tıklayın.

Veri tipleri nasıl kullanılır?

Kod:

A% = 253

Y! = 3.141

Z& = 254144

A nın INTEGER olduğunu öğrenmiştik ama Y! ve Z&
! işareti SINGLE verilere sahip değişkenleri tanımlamak için, & işareti LONG verilere sahip
değişkenler içindir.

ARAŞTIR: Şimdi siz DOUBLE ve STRING değişkenler için hangi işaretler kullanılması
gerektiğini HELP den bulmaya çalışın.

Data tipi kullanımının bir başka yolu

Değişkenlerin data tiplerini tanımlamak için birkaç alternatif yöntem vardır. Bunlar:

Kod:

DIM A AS INTEGER

DIM B AS SINGLE

DIM C AS LONG

Bu stil en güzel görüneni ve iyi programcıların kullandığı stildir. Tanımları düzgün yaptıktan
sonra programın ileriki aşamalarında yalnızca değişken adını kullanmanız yeterlidir.

Kod:

DEFINT A

DEFSNG B,K,N

DEFLNG C-D

Bu da başka bir stil Değişkenin baş harfine göre tanımlanmamış olan tüm değişkenler DEF in
yanındaki değişken türünde olur. İyi bir stil sayılmaz.

Kod:

A% = 253

Y! = 3.141

Z& = 254144

Bu şekilde tanımlama yaptığınızda aynı değişkeni hep aynı şekilde yazmak zorundasınız. Yani
A% nin değerini değiştirmek için A = 100 kullanmak sakıncalıdır.

DİKKAT:

Kod:

A! = 22.125

A& = 46500

A% = 255

PRINT A!, A&, A%

PRINT A

Kaf_Dağı

22 Aralık 2015 11:49

Cevap: Quick-Basic Adına Tüm Konular

Kullanıcı tanımlı Veri Tipleri

Kendi veri tipinizi belirleyebilirsiniz Bu size bellekte kaplayacak olan verilerinizi kullanmanızı
kolaylaştıracaktır. Örneğin kişilerin adres bilgileri üzerinde işlem yapmak istiyorsanız, kişi için
kendinizin belirlediği bir veri yapısı oluşturabilirsiniz.

Kod:

TYPE Adrestipi

Adresi AS STRING * 50

PostaKodu AS STRING * 7

Adi AS STRING * 30

Telefonu AS STRING * 18

END TYPE

Bu açıklamalar sanırım yetersiz olacaktır başlangıç için. Daha detaylı bilgi almak için TYPE
yazısı üzerinde iken F1 e basarak yardım alabilirsiniz.
Tanımlamış olduğumuz ADRESTIPI veri tipini kullanmak için bellekte yer açmalıyız. Bunun için

Kod:

DIM Personel AS Addrestipi

komutunu kullanırız. Şimdi bu değişkenin(PERSONEL) elemanlarına değer aktaralım

Kod:

Personel.Adresi = "Ankara Caddesi"

Personel.PostaKodu = "33522"

Personel.Adi = "Murat Velioğlu"

Personel.Telefonu = "0866-945 44 21"

Bu tip değişken kullanımı QBasic de yeni iseniz ve ya diğer BASIC dillere alışkanlığınız varsa
garip gelecektir. Ama bu tip değişkenler diğer dillerde de kullanılmaktadır. Şu an için
telaşlanmanıza gerek yoktur. Zamanla bu yapıya alışıp gerekli yerlerde rahatlıkla
kullanacaksınız.

Kaf_Dağı

22 Aralık 2015 11:50

Cevap: Quick-Basic Adına Tüm Konular

Veri Tipleri Özet Tablosu

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kaf_Dağı

22 Aralık 2015 11:56

Cevap: Quick-Basic Adına Tüm Konular

Bölüm 3: CLS , INPUT ve PRINT

Bu bölümde ekranı silme, program çalışırken değişkenlere veri aktarma ve bu verileri
yazdırmayı öğreneceğiz.

CLS komutu

Bu komut çalıştırıldığında daha önceden ekrana yazılmış olan yazılar silinir. Genelde
programlar, ilk olarak ekranı temizleyerek, sonraki yazılacaklara temiz bir ekran hazırlar.
Burada dikkat edilecek şey CLS den bir önceki zemin rengi ne ise ekran o renk ile doldurulur.
CLS den önce bir renk ayarı yapılmamışsa ekran siyah renk ile doldurularak temizlenir.

Kod:

COLOR , 4

CLS

PRINT "Merhaba"

Kaf_Dağı

22 Aralık 2015 12:01

Cevap: Quick-Basic Adına Tüm Konular

Değişkenlere Veri aktarmak

Veri tiplerini açıklarken değişkenlerden bahsetmiştik. Değişkenler, bilgisayarın aklında tutması
gereken şeyleri aktarırız. Değişkenler bir harf ile başlayıp 40 karaktere kadar bir isim alabilir.
İçinde İngilizce harf ve rakamların dışında semboller olursa kabul edilmez.

Kod:

4KAT

MÜŞTERİ

PERSONEL NO

MEDENI_DURUMU

Yukarıdaki değişken için kullanılan isimler hata oluşturacaktır.

Kod:

PI = 3.14

PRINT PI

1. satırda PI değişkenine 3.14 rakamını aktardık. Sonraki aşamalarda PI sayısına bir sayı
aktarmazsak program sonlana kadar o değeri aklında tutar. Ve biz bunu gerekli olduğunda
kullanırız. Örneğin 2. satırda olduğu gibi.
Yukarda olduğu gibi değişkenlere veriyi direkt aktardığımız gibi bir fonksiyonun ya da işlemin
sonucunu da aktarabiliriz.

Kod:

SAYI = 125

KARE = SAYI * SAYI

PRINT KARE

1. satır artık yabancı gelmiyor size. SAYI değişkenine aklında 125 rakamını tut dedik. KARE
değişkenine de SAYI değişkenin tuttuğu rakamı kendisiyle çarp ve sonucunu aklında tut dedik.
Bu arada SAYI değişkeninin değerinde hiçbir değişiklik olmaz. Değişiklik olabilmesi için
aktarma işlemi olması gerekir. = işaretinin sağındaki değer veya işlem solundaki değişkene
aktarılır. Yukarda olduğu gibi = in sağ tarafında SAYI nın kendisiyle çarpımından SAYI
değişkeni etkilenmemektedir.

Değişkenlere değerler aktarılırken tanımlanan tipine uygun değerler aktarılmalıdır. Sınırını aşan
veya uygun olmayan veri aktarımlar kabul edilmeyecektir. Aşağıdaki satırlar hata oluşturacaktır.

Kod:

A% = 33652 'Sınırı aşmıştır

A& = 2154.43 ' Bu tür değişkenler küsurlu sayıları aklında tutamaz o yüzden sayıyı

yuvarlayarak 2154 yapar. Bu satırda bilgisayar bir uyarı vermez.

A$ = 65000 ' String değişkenlere değerler " (çift tırnak) lar ile aktarılır

A# = "Merhaba" ' Bu tür değişkene string veri aktarılamaz

Kaf_Dağı

22 Aralık 2015 12:04

Cevap: Quick-Basic Adına Tüm Konular

INPUT Komutu

Değişkenlere A = 45 gibi bir satır yazarak bir değer aktarabiliyoruz. Bazen program çalışırken
değişkenlere programı kullanan kişinin veri aktarması istenebilir. INPUT komutu ile istediğimiz
değişkenlere program çalışırken değer aktarılabilir.
INPUT kullanılırken; INPUT un ardından verilecek mesaj tırnaklar arasında yazılır sonra (,)
veya (;) konulur ve klavyeden yazdıklarımızı aktaracağımız değişken ismi yazılır.

Kod:

CLS

INPUT "ADINIZ " ; AD$

INPUT "YAŞINIZ " , YAS%

PRINT "Sayın " ; AD$ ; YAS% ; " yaşındasınız."

Yaşımızı sorduğunda rakam dışında bir şey yazarsak, bir uyarı ile aynı soruyu tekrar sorulur.

DÜŞÜN: Burada virgül ile noktalı virgülün farkı ne?

Kaf_Dağı

22 Aralık 2015 12:55

Cevap: Quick-Basic Adına Tüm Konular

PRINT Komutu

Ekrana bir mesaj veya bir değişkenin değerini yada bir fonksiyon yada işlemin sonucunu
yazdırmak için kullanılır. PRINT yazmak yerine yalnızca ? yazın.

Kod:

CLS

PRINT 3 * 8 + 12 ' Sonuç 36 olarak ekranda görünecek

YASI = 32

PRINT "Yaşı = " ; YASI ; " dir"

A% = 15

B! = 3.14

ADI$ = "Mesut"

PRINT A% , B! , ADI$

SA$ = "Akcan"

PRINT ADI$ ; SA$

DÜŞÜN: PRINT de kullanılan virgül ve noktalı virgülün farkı ne?
PRINT komutunda bir işlemin sonucunu da yazdıracağımızı söylemiştim.

Kod:

PRINT 12+33 ' Ekrana toplamı(45) verir

PRINT 125+48*10 ' 605 yazar. Öncelik sırası: Parantez içi, * / + - dir

PRINT 12-(80/4-23)+54/9 ' sonuç: 21 ??
 

PRINT 1 + 1 ' Toplam olan 2 çıkar

PRINT "1" + "1"

' 11 çıkar. Çift tırnak içindeki sayılar sayı olarak görülmez.

' Burada sayı olmadığı için toplama işlemi değil

' tırnaklar içindekileri birleştirme işlemi uygulanır

PRINT "QUICK" + "basic" ' QUICKbasic

PRINT 8 + "elma" ' !!! Hata !!!

PRINT "8" + "elma" ' 8elma

PRINT 8 ; "elma" ' 8 elma

PRINT 8/2 ; "elma" ' 4 elma

Uygulama

Kod:

CLS

PRINT "Çıkmak için 0 yaz"

basla:

INPUT "Bir sayı yaz "; SAYI

IF SAYI = 0 THEN END

CLS

PRINT "Verdiğiniz sayı "; SAYI

PRINT SAYI; " 'nın karesı "; SAYI ^ 2; " dır."

PRINT SAYI; " 'nın küpü "; SAYI ^ 3; " dır."

GOTO basla

Kaf_Dağı

22 Aralık 2015 13:01

Cevap: Quick-Basic Adına Tüm Konular

Bölüm 4: Kontrol blokları

Programlama dillerinde döngüler ve akış kontrol komutları çok sık kullanılır. Programları
program yapan esas kısımlar bu komutlarla sağlanır. Qbasicde diğer programlama
dillerindekine benzer yapıda döngüler ve mantıksal karşılaştırmalar yapılabilir.

IF ... THEN ... ELSE

Mantıksal karşılaştırma için kullanılır. Karşılaştırma işlemin sonucunda bir değer döner bu
değer ya mantıksal DOĞRU dur ya da mantıksal YANLIŞ. Lise 1 deyken matematik dersinde 1
ve 0 lar ile, doğru ve yanlışlar ile işlemler yapardık. Birçok kişide ne işe yarıyor bunlar diye
söylenip dururlardı. Demek ki bir gerekliliği varmış. İşte onlar burada gerekecek, isterseniz
MANTIK ile ilgili kısımları bir daha gözden geçirin. :)

Mantıksal karşılaştırma için basit bir örnek:

Kod:

IF A = 40 THEN B = 40

Burada A değişkenin değeri 40 ise B nin değeri de 40 olacaktır. Eğer A nın değeri 40 dan farklı
ise bu satırın hiçbir etkisi olmayacaktır.

Bir başka kullanımı:

Kod:

A = 25

IF A > 40 THEN M$ ="Sayı 40 dan büyük" ELSE M$= "Sayı 40 dan küçük"

PRINT M$

Üstte A değişkeninin değerinin 40 dan büyük olup olmadığı kontrol ediliyor. Mantıksal
karşılaştırmanın sonucunda ancak iki değer dönebilir. DOĞRU veya YANLIŞ. Doğru olması
durumunda THEN den sonraki işlem yapılır, YANLIŞ olması durumunda ise ELSE den sonraki
işlem. A ya 25 aktardığımız için A>40 mantıksal karşılaştırmanın sonucu YANLIŞ olacaktır.
Çünkü 25, 40dan büyük değil. Bu durumda M$ a "Sayı 40 dan küçük" değeri aktarılır.

DÜŞÜN: Üstteki programı denedikten sonra A = 40 olsaydı sonuç ne olurdu? diye düşünüp
cevabı bulmaya çalışın. Sonra Qbasicde deneyerek düşündüğünüzü kontrol edin.

Kod:

IF A = 40 .... ' A , 40 a eşit mi?

IF A > 40 .... ' A , 40 dan büyük mü?

IF A < 40 .... ' A , 40 dan küçük mü?

IF A <> 40 .... ' A , 40 a eşit değilse

IF A <= 40 .... ' A , 40 a eşit ya da 40 dan küçük mü?

IF A >= 40 .... ' A , 40 a eşit ya da 40 dan büyük mü?

IF A ' A nın değeri 0 dan farklı mı?

IF NOT A ' A nın değili DOĞRU mu?

IF ile karşılaştırma yaptığımızda dönen değerlere göre çok sayıda komut yürüteceksek
aşağıdaki yapıyı kullanırız. Bu şekilde kullanımda karşılaştırma bloğunu bitiren END IF
kullanmak zorundayız.

Kod:

IF A > 40 THEN

'doğruysa yapılacaklar

....

....

ELSE

'Yanlışsa yapılacaklar

....

....

END IF

Örnek :

Kod:

INPUT "ADINIZ " ; AD$

IF AD$ = "MESUT" THEN

PRINT "SİZİN ADINIZ MESUT"

ELSE

PRINT "SİZİN ADINIZ MESUT DEĞİL"

END IF

Kaf_Dağı

22 Aralık 2015 13:04

Cevap: Quick-Basic Adına Tüm Konular

İç içe IF

Kod:

INPUT A

IF A > 40 THEN

IF A < 60 THEN

PRINT "SAYI 40 ile 60 arasında"

ELSE

PRINT "SAYI 60 yada 60dan büyük"

END IF

ELSE

IF A = 40 THEN

PRINT "SAYI 40a eşit"

ELSE

PRINT "SAYI 40dan küçük"

END IF

END IF

Kaf_Dağı

22 Aralık 2015 13:12

Cevap: Quick-Basic Adına Tüm Konular

Mantıksal karşılaştırmalar

Şimdiye kadar bir satırda bir değişkeni karşılaştırdık. Bazen birkaç değişkenin karşılaştırılıp
sonucunun alınması gerekebilir.

Kod:

INPUT A

IF A>10 AND A<20 THEN PRINT "SAYI 10 ile 20 arasında"

INPUT A

IF A<10 OR A>50 THEN PRINT "SAYI 10 ile 50 arasında değil"

' yani sayı 10 dan küçük ya da 50 den büyük

Mantıksal karşılaştırmalarda kullanılacak terimler: AND , OR , XOR , EQV, IMP, NOT

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

1 -> Mantıksal Doğru
0 -> Mantıksal Yanlış
Bu terimlerden faydalanarak bitsel karşılaştırma da yapılabilir.
PRINT (155 AND 160)
yazdığımızda 128 sonucunu alırız. Çünkü 155 in 2 li sayı düzenindeki karşılığı 10011011, 160
ınki ise 10100000. İkisini alt alta yazıp bitlerini AND ile karşılaştırdığımızda

Kod:

10011011

10100000

--------

10000000

çıkar. O da 128 e eşittir. Desimal sayıları 2 li sayıya çevirmek için Hesap makinasını Bilimsel
görünüme getirerek kullanabilirsiniz.. Dec = Decimal(10 lu sayı), Bin = Binary (2 li sayı), Hex =
Hexadecimal (16 lı sayı)

Kaf_Dağı

22 Aralık 2015 13:13

Cevap: Quick-Basic Adına Tüm Konular

ELSEIF, SELECT CASE

IF in bir başka kullanımı

Kod:

INPUT "1 ile 3 arasında sayı girin " ; A

IF A = 1 THEN

PRINT "SAYI = 1"

ELSEIF A = 2 THEN

PRINT "SAYI = 2"

ELSEIF A = 3 THEN

PRINT "SAYI = 3"

ELSE

PRINT "HATALI SAYI"

END IF

Bunun yerine buna benzer yapıya sahip anlaşılırlığı ve kodlaması kolay olan SELECT CASE
yapısı kullanılır.

Kod:

INPUT "1 ile 3 arasında sayı girin " ; A

SELECT CASE A

CASE 1

PRINT "SAYI = 1"

CASE 2

PRINT "SAYI = 2"

CASE 3

PRINT "SAYI = 3"

CASE ELSE

PRINT "HATALI SAYI"

END SELECT

Kaf_Dağı

25 Aralık 2015 14:49

Cevap: Quick-Basic Adına Tüm Konular

Bölüm 5: Döngüler

Tekrar edilen işlemler için döngüler kullanılır. Böylece bilgisayarın sürekli yapacağı işlemler için
aynı komutları bir daha yazmak zorunda kalmayız.

GOTO döngüsü

En basit döngü GOTO ile yapılan döngüdür

Kod:

basla:

A = A + 1

PRINT A

GOTO basla

Yukarıdaki program bir sonsuz döngü oluşturur. Durdurmak için CTRL-PAUSE tuşlarına
basınız. Aşağıdaki şekilde değişiklik yaparsak döngüyü kontrol altına almış oluruz.

Kod:

basla:

A = A + 1

IF A>20 THEN END

PRINT A

GOTO basla

Kaf_Dağı

25 Aralık 2015 14:51

Cevap: Quick-Basic Adına Tüm Konular

FOR ... NEXT döngüsü

Belirli sayılarda işlemlerin tekrar etmesi için kullanılır.

Kod:

FOR N = 1 TO 25

PRINT N

NEXT N

1 den 25 e kadar olan sayıları yazacaktır. Her döngüde N değişkeninin değeri 1 artacaktır.
Eğer ilk satırı

Kod:

FOR N = 1 TO 25 STEP 4

yapacak olursak. N nin ilk değeri 1 olacak sonra her seferinde üzerine 4 eklenerek devam
edecektir.

Kod:

FOR N = 25 TO 1 STEP -1

yazılacak olursa 25 den 1 e doğru N nin değeri her seferinde 1 azaltılır.
NEXT in arkasına değişkeni yazmak şart değildir ama okunurluğu kolaylaştırmak için yazmakta
fayda vardır.
FOR ları içi içe koyarak da kullanılabilir. İçerdeki FOR un NEXT i dışarıdakinin NEXT inden
sonra gelmemesine dikkat etmelisiniz.

Kod:

FOR N = 1 TO 10

FOR M = 1 TO 4

PRINT N * M ,

NEXT M

PRINT

NEXT N

FOR döngüsünden çıkma gereği olursa EXIT FOR ile çıkılabilir

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 17:37.