12 lines
229 B
Text
12 lines
229 B
Text
100 REM Catalan numbers
|
|
110 DIM C(15)
|
|
120 C(0) = 1
|
|
130 PRINT 0, C(0)
|
|
140 FOR N = 0 TO 14
|
|
150 C(N + 1) = 0
|
|
160 FOR I = 0 TO N
|
|
170 C(N + 1) = C(N + 1) + C(I) * C(N - I)
|
|
180 NEXT I
|
|
190 PRINT N + 1, C(N + 1)
|
|
200 NEXT N
|
|
210 END
|