Floyd's triangle: Difference between revisions
Content added Content deleted
(add Forth) |
|||
Line 1,872: | Line 1,872: | ||
=={{header|Run BASIC}}== |
=={{header|Run BASIC}}== |
||
{{incorrect|Run BASIC|columns not aligned.}} |
|||
<lang runbasic>input " Number of rows:"; rows |
<lang runbasic>input " Number of rows:"; rows |
||
for r = 1 to rows ' r = rows |
for r = 1 to rows ' r = rows |
||
for c = 1 to r ' c = columns |
for c = 1 to r ' c = columns |
||
j = j + 1 |
j = j + 1 |
||
print j;" "; |
print using("#####",j);" "; |
||
next c |
next c |
||
print |
print |
||
next r</lang> |
next r</lang> |
||
<pre> |
<pre> Number of rows:?14 |
||
1 |
1 |
||
2 3 |
2 3 |
||
4 5 6 |
4 5 6 |
||
7 8 9 10 |
7 8 9 10 |
||
11 12 13 14 15 |
11 12 13 14 15 |
||
16 17 18 19 20 21 |
16 17 18 19 20 21 |
||
22 23 24 25 26 27 28 |
22 23 24 25 26 27 28 |
||
29 30 31 32 33 34 35 36 |
29 30 31 32 33 34 35 36 |
||
37 38 39 40 41 42 43 44 45 |
37 38 39 40 41 42 43 44 45 |
||
46 47 48 49 50 51 52 53 54 55 |
46 47 48 49 50 51 52 53 54 55 |
||
56 57 58 59 60 61 62 63 64 65 66 |
56 57 58 59 60 61 62 63 64 65 66 |
||
67 68 69 70 71 72 73 74 75 76 77 78 |
67 68 69 70 71 72 73 74 75 76 77 78 |
||
79 80 81 82 83 84 85 86 87 88 89 90 91 |
79 80 81 82 83 84 85 86 87 88 89 90 91 |
||
92 93 94 95 96 97 98 99 100 101 102 103 104 |
92 93 94 95 96 97 98 99 100 101 102 103 104 105</pre> |
||
=={{header|Scala}}== |
=={{header|Scala}}== |