Q Basic Alıştırma ok şekli
Q Basic Alıştırma ok şekli q basic , alıştırma, kod yazılım, visual basic kod yazılım, q basic alıştırma Kod: Kodu kopyalamak için üzerine çift tıklayın! CLS
INPUT "satr says gir"; s
FOR i = s TO 1 STEP -1
d$ = ""
FOR k = s TO i STEP -1
d$ = d$ + "*"
NEXT k
PRINT d$
NEXT i
FOR i = 1 TO s - 1
d$ = ""
FOR k = s - 1 TO i STEP -1
d$ = d$ + "*"
NEXT k
PRINT d$
NEXT i
__________________ SusKun ve Sessiz Mürekkep... Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
|