Catalan numbers: Difference between revisions

Content added Content deleted
(Added solution for Action!)
m (→‎{{header|GW-BASIC}}: Added displaying numbers of numbers.)
Line 467: Line 467:
<lang gwbasic>10 DIM C(15)
<lang gwbasic>10 DIM C(15)
20 C(0) = 1
20 C(0) = 1
30 PRINT C(0)
30 PRINT 0, C(0)
40 FOR N = 0 to 14
40 FOR N = 0 to 14
50 C(N+1) = 0
50 C(N+1) = 0
Line 473: Line 473:
70 C(N+1) = C(N+1) + C(I)*C(N-I)
70 C(N+1) = C(N+1) + C(I)*C(N-I)
80 NEXT I
80 NEXT I
90 PRINT C(N+1)
90 PRINT N+1, C(N+1)
100 NEXT N
100 NEXT N
</lang>
</lang>