1 ile 100 Arasında Rastgele Seçilen 10 Tamsayıyı Toplayan Program

CLS : RANDOMİZE TİMER

FOR X = 1 TO 10
C=FIX(RND*99)+1
P=P+C
PRINT "RASTGELE SEÇİLEN 10 SAYİ = " , C
NEXT
PRINT "SAYILARIN TOPLAMI = " , P
END