10 lines
217 B
Text
10 lines
217 B
Text
INPUT "Number of rows: "; nrows
|
|
FOR row = 0 TO nrows-1
|
|
c = 1
|
|
PRINT SPACE$((nrows-row)*3);
|
|
FOR i = 0 TO row
|
|
PRINT FORMAT$("%5d ", c);
|
|
c = c * (row - i) / (i+1)
|
|
NEXT i
|
|
PRINT
|
|
NEXT row
|