afi

Bilgisayarın ürettiği rastgele büyük harfin, en fazla 10 denemede tahmin edilme oyunu programı

5 REM HARF TAHMİN OYUNU
10 CLS : RANDOMIZE TIMER : HARF$ = CHR$(RND * 25 +65)
20 FOR I = 1 TO 10
30 INPUT "TAHMİNİNİZ:  " ; TAHMIN$ : PRINT
40 IF TAHMIN$ = HARF$ THEN PRINT I ;  " tahminde bildiniz..." : GOTO 70
50 NEXT I
60 PRINT  "10 hakkınız bitti..."
70 END

Hiç yorum yok :

Yorum Gönder