Data update

This commit is contained in:
Ingy döt Net 2024-10-16 18:07:41 -07:00
parent 81fd053722
commit 52a6ef48dd
10248 changed files with 63654 additions and 6775 deletions

View file

@ -0,0 +1,10 @@
10 let row = 12
20 for i = 0 to row
30 let c = 1
40 print tab (37-i*3);
50 for k = 0 to i
60 print using " #### ";c;
70 let c = c*(i-k)/(k+1)
80 next
90 print
100 next

View file

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

View file

@ -0,0 +1,9 @@
input "Number of rows? " r
for i = 0 to r-1
c = 1
for k = 0 to i
print c using "####";
c = c*(i-k)/(k+1)
next
print
next