Sayfa 11

GOSUB'la gidilen yerdeki komutlar olarak düşünebiliriz.Mektubun geri postalanması ise RETURN oluyor bu durumda. O zaman bizim programımız da şöyle bir şeyler olacak... Ön- ce kullanıcıdan hangi işlemi yapmak istediğini sorcaz. Verdiği cevaba göre alt programa gitcez. İşimizi bitirince de başadönceez. Kolaymış yav. 10 INPUT"Hangi işlemi yapmak istiyorsanız onun işaretine basın (4 - * /)";IS$ 20 IF 1S$-"4" THEN GOTO 100 30 IF 1S$-"-" THEN GOTO 200 40 IF 1S$-"*" THEN GOTO 300 50 IF 1S$-"/" THEN GOTO 400 60 GOTO 10 100 PRINT "Toplanacak"; 110 GOSUB 1000 120 1380 GÖOTO 10 200 "Çıkartılacak"; 210 GOSUB 1000 220 PRİNT A-B 230 GOTO 10 300 PRINT "Çarpılacak"; 310 GOSUB 1000 320 PRİNT A*B 330 GOTO 10 400 PRINT "Toplanacak"; 410 GOSUB 1000 420 PRİNT A-B 430 GOTO 10 1000 PRIİNT"sayıları sırasıyla yazıp RETURN'e basın" 1010 INPUT"Birinci sayı";A 1020 INPUT"İkinci sayı:;B 1030 PRİNT "Sonuç:"; 1040 RETURN "İşte bu kadaar." diye bağırdı Abdullah. Sonunda becerdim. Program yapılacak olan işlemi öğrendikten sonra işleme girecek olan sayıları almak için bir alt programa sıçrıyordu. Burada iki sayıyı da öğrenen program bu sayılar üzerinde gerekli işlemleri gerçekleştirdikten sonra programın en başına kadar geri dönüyordu.

” işte DORT LARI ALMAYA