10 INPUT "Number of rows? ",R 20 FOR I=0 TO R-1 30 C=1 40 FOR K=0 TO I 50 PRINT USING "####";C; 60 C=C*(I-K)/(K+1) 70 NEXT 80 PRINT 90 NEXT