Q Basic Alıştırma faktöriyel hesaplama
Q Basic Alıştırma faktöriyel hesaplama 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
10 PRINT "FAKTORIYELINI HESAPLAMAK ISTEDIGINIZ SAYiyi GIRIN"
20 INPUT N
30 IF N = 0 THEN PRINT 1: GOTO 100
40 F = 1
50 S = 1
60 F = F * S
70 S = S + 1
80 IF S > N THEN GOTO 90 ELSE GOTO 60
90 PRINT F
100 END
__________________ 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.
|