1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
CLS PRINT "GIRILEN SAYININ FAKTORIYELINI HESAPLAYAN PROGRAM" INPUT "SAYI = ", N I = 0 T = 1 ISLEM: I = I + 1 T = T * I IF I = N THEN PRINT N, " FAKTORIYEL = ", T END END IF GOTO ISLEM |
Örnek Çıktı :
1 2 3 |
GIRILEN SAYININ FAKTORIYELINI HESAPLAYAN PROGRAM SAYI = 6 6 FAKTORIYEL = 720 |