QBasic Rastgele 10 Adet Sayıyı Büyükten Küçüğe Sıralama

QBasic programı gelişim aşamasında  bazen  karşımıza qbasic rastgele 10 adet sayı yı büyükten küçüğe sıralama programı nasıl yapılır sorusu çıkıyor.

Bu kodlar ile sıralama algoritması ile  sıralama işlemlerinizi kolayca yapabileceksiniz.

Q basic Sayı Sıralama Algoritması

Sıralama algoritmaları ile birlikte bir dizi içerisinde bulunan sayıları farklı metotlar ile sıralamak mümkündür.

Web sitemizde birbirinden farklı sıralama algoritmalarını  bulabilirsiniz. Verilen bu programı anlamak için ilk olarak swap komutunu bilmek gerekir.

Swap komutu

İlk olarak, swap komutu Türkçe anlam olarak takas demektir.

Son olarak, kodumuzun örnek yazılımı ise:

SWAP a(x), a(y)

Bu paragrafta, swap komutu bizlere kolayca girilen iki değişkeni yer değiştirmesi işlemini yapar. İkincisi, swap komutu yerine örnek  kodlarımız ise 3 adet değişken ile birlikte takas , yer değiştirme işlemini değiştirmektir.  Son olarak, komut kullanmadan  yapabileceğimiz kodlama örneği ise:

a=b
b=c
c=a

Sonuç olarak bu kodlama stili ile birlikte takas işlemini swap komutuna gerek kalmadan yapmış oluyoruz.

Üstelik sizlerde kendinize özgü kodları bizlere iletebilirsiniz.

QBasic Rastgele 10 Adet Sayıyı Büyükten Küçüğe Sıralama

CLS
RANDOMIZE TIMER
DIM a(10)
FOR x = 1 TO 10
a(x) = FIX(RND * 100)
PRINT a(x)
NEXT x
FOR x = 1 TO 10
FOR y = 1 TO 10
IF a(x) "büyüktür;" a(y) THEN SWAP a(x), a(y)
NEXT y
NEXT x
COLOR 12
FOR x = 1 TO 10
PRINT a(x)
NEXT x

Sizlerde kendi yazdığınız programları, istek ve sorularınızı bizlere iletişim kısmından iletebilirsiniz.

QBasic ile ilgili kavramlara ek olarak, QBasic öğrenimini teşvik etmek için karar verme ve döngü kontrolleri dahil olmak üzere bazı örnekler ve örnek uygulamalar vardır.
Diğer örneklere de göz atabilirsiniz:
Tc Kimliğin Son 2 Hanesini Bulma 
Girilen Doğum Tarihine Göre Ne Zamandır Yaşıyorum 
Rastgele 10 Adet Sayıdan En Büyüğünü Ve En Küçüğünü Bulan Program 
Asal Sayı 
1-100 Arası Kaç Adet 9 Olduğunu Bulan Program

En önemlisi, kodlarda herhangi bir problem olduğunda lütfen yorum kısmından iletişime geçebilirsiniz.