ENJOY UR LIFE TODAY BECAUSE YESTERDAY HAS GONE TOMORROW MAY NEVER COME

1 2 2 3 3 3 4 4 4 4 5 5 5 5 5 CLS A = 5 FOR I = 1 TO 10 PRINT A A = A + 5 NEXT I END

1 1 2 1 2 3 1 2 3 4 5 1 2 3 4 5 CLS FOR I = 1 TO 5 FOR J = 1 TO I PRINT J; NEXT J PRINT NEXT I END

CLS A = 5 FOR I = 1 TO 10 PRINT A A = A + 5 NEXT I END

CLS FOR I = 1 TO 10 PRINT I ^ 2 NEXT I END

CLS A = 1 B = 1 FOR I = 1 TO 10 C = A + B A= B B = C NEXT I END

CLS INPUT ''Enter any number''; N FOR I = 1 TO 10 PTINT N ; ''X'' ; I ; ''='' ; N * I NEXT I END

CLS INPUT ''Enter any number''; N F = 1 FOR I = 1 TO N F = F * I NEXT I PRINT ''Factorial number''; F END