qBasic ?

Arkadaşlar qBasic Diliyle ilgili küçük bir sorum olacak.

Programda "A" Tuşuna basılınca 10. Line ye gidecek. "B" Tusunda 11. Line ye gidecek. Bunu nasıl yapacağımı anlatırmısınız. Örnek olursa iyi olur.

[ Tüm kodu seç ] [ Yeni Pencerede Göster ]

1 CLS 2 PRINT "A tusu yada B tusuna basin" .  . . burdaki komutları bilmiyorum :) 8 IF A$ <> "" THEN GOTO 10 9 IF B$ <> "" THEN GOTO 11 10 PRINT "DOGRU" 11 PRINT "YANLIS" 12END

Birkaç sorum olacak.

1) Neden bu dili öğrenmek istiyorsunuz?
2) Zaten örnek koymuşsunuz bu işi birebir yapan ne örneği istiyorsunuz?
3) Satır satır size birşeylerin anlatılmasını mı bekliyorsunuz?
4) Eğer programlama öğrenmek istiyorsanız gidin ingilizce öğrenin. Şu yazdığınız kod neredeyse düz ingilizce.

1) Programlama dillerinin en basit ve kolayı
2) Örneği koydum Çünkü sorduğum soru daha iyi anlaşılsın diye. Birebir örneği demişsiniz ama çalışmıyor. Bir yerlerde hata yapıyorum herhalde.
3) Sadece (örnek) A tuşuna basınca 10. lineye , B tuşuna basın 11. Lineye hangi kodlarlar gidecek.
4) Zaten ingilizce öğreniyorum. Ama programlama dillerinde gramer bilgileri kullanılıyormu (qbasic) yani programlama dili düz ingilizce olsaydı ingilizce öğretmenleri programlamacı olurdu. Şu yazdığım koddaki kelimeleri ingilizceden az çok anlayan biri de anlıyabilir. :)

1 CLS
2 INPUT  "A tusu yada B tusuna basin";A$
. 
.
.
burdaki komutları bilmiyorum :)
8 IF A$ = "A" THEN GOTO 10
9 IF A$ = "B" THEN GOTO 11
10 PRINT "DOGRU"
11 PRINT "YANLIS"
12 END

Doğrusu bu
1 qbasic neden öğreniyorsun merak ettim?
2 illede öğrenceksen bilmediklerini sor bu dilde biraz paslandım sayende tekrar hatırlamış olurum :))

Ama benim sormak istediğim şey A tuşuna basılınca hemen istenilen Lineye gidecek. Yani A yazıp enter e basmadan. Teşekkürler ilgin ve önerin için.

Neden herkes qbasic deyince garipsiyor ve neden öğreniyorsun diyor ben onu anlamış değilim. qBasic gereksiz bir dilmi ???

qbasic yerine c++ öğrenmeni tavsiye derim

qbasic güzel bir başlangıç olur diye düşünmüştüm :) . Üsteki mesajımı Düzenledim okursan sevinirim

1 CLS
2 PRINT "A tusu yada B tusuna basin"
3 A$=INKEY$
4 İF A$="" THEN GOTO 3
5 İF A$="A" THEN PRİNT "A YA BASTIN:END
6 İF A$="B" THEN PRINT "B YE BASTIN":END
7 İF A$=" " THEN END
8 GOTO 3

Yıl olmuş 2011 sen hala QBasic öğrenicem diye uğraşma dostum, ufkunu aç kocaman bir dünya var dışarıda. Programlama dillerinin en kolayı falan da değil, daha da low level gitmek istiyorsan assembly öğren, işlemciyle konuşursun, o da senin QBasic'te kastettiiğin basitlik ayarında.

ahmet diyer konuda asal sayı programı var aynısını qbasic ile yapalım bakalım kaç saniyede bitecek

censez41 teşekkür ederim sonunda yaptım. Şu an qbasic diline başlıyalı çok olmadı ama birçok şey öğrendim. qBasic de çok iyiyim demiyorum. Ama ilk dilde programlama dilleri hakkında biraz bilgiye sahip oldum. Şu an sadece qbasic değil diğer dilleride araştırıyorum. Onlardan az çok bir şey öğreniyim.  Sonunda en çok hoşuma giden program dilini seçip ona yükleneceğim. Sonra en çok övülen ( :P ) C diliyle uğraşırım. Tabi şu an sadece araştırıyorum. Bana göre programlama dillerine başlamak için Önce Kendimizi Programlamalıyız , Sonra Program Yazmakla İlgilenmeliyiz. Yani sadece 1 günlük hevesden ibaret olmamalı. Şu anda programlama dillerinden çok bir şey anlamıyorum ama küçük programlar fonksiyonlar , işlemlerle uğraşırken saatin nasıl geçtiğini anlamıyorum . ve bu işten zevk alıyorum. (pc oyunlarından hiç alamadığım kadar ) İnşallah başarılı olurum ne diyim :) 

10 A$=TIME$
30 DAK=(VAL(MID$(A$,4,2))*60+VAL(MID$(A$,7,2))
40 INPUT "KAÇA KADAR ASAL SAYI ARAYACAĞINIZI YAZIN";BAS
50 FOR SAY=1 TO BAS
60 FOR BAK=SAY-1 TO 2 STEP -1
70 IF INT(SAY/BAK)*BAK=SAY THEN DEGIL=1:BAK=2
80 NEXT BAK
90 IF DEGIL=1 THEN DEGIL=0:ELSE ASAL=ASAL+1
100 NEXT  SAY
110 PRINT "ASAL SAYI ADETI",ASAL
115 A$=TIME$
120 SURE=(VAL(MID$(A$,4,2)*60+VAL(MID$(A$,7,2))
130 FARK=SURE-DAK
140 PRINT "PROGRAM "FARK;"SANIYEDE BITIRDI"
150 END

qbasıc ıle ılgılı bır sorum var     
7 ssyıdan buyuk olanı bulan programın kodu qbasıcde nasıl yapılıyor kodu bılen varsa yardım edebılırmı lutfen...???

Alıntı: mstyy  

qbasıc ıle ılgılı bır sorum var     
7 ssyıdan buyuk olanı bulan programın kodu qbasıcde nasıl yapılıyor kodu bılen varsa yardım edebılırmı lutfen...???