Bilgisayarla Oyun Oynamaya Ne Dersiniz??

Evet arkadaşlar şimdi kı programınız küçük bir oyun .ßu oyunda bilgisayar kendi belirlediği bir sayı tutacak kullanıcı da bu sayıyı bulmaya çalışacak.Eğer kullanıcının girdiği sayı bilgisayarın nın tuttuğu rakamdan büyük ise “azalt”, küçük ise “arttır” seklınde yazan programı yapalım

—————kodların başlangıcı—————

DIM rasgele as INTEGER
DIM sayi as INTEGER
rasgele =RND*100
FOR i=1 to 5
INPUT “sayı giriniz”;sayi
IF sayi >rasgele THEN
PRINT “sayıyı azaltınız”
ELSEIF sayi<rasgele THEN
PRINT”sayıyı arttırın”
ELSEİF sayi =rasgele THEN
PRINT “doğru sayıyı buldunuz “
EXIT FOR
ELSE
END IF
NEXT
IF sayi <>rasgele THEN
PRINT”tutulan sayi”;rasgele
END IF

—————kodların bitişi—————

hadı oynamaya