Append numbers at same position in strings: Difference between revisions
Content added Content deleted
m (→{{header|RPL}}: Add implementation with HP-49g extended instruction set) |
imported>Maxima enthusiast No edit summary |
||
Line 469: | Line 469: | ||
{{out}}<pre> |
{{out}}<pre> |
||
{11019,21120,31221,41322,51423,61524,71625,81726,91827} |
{11019,21120,31221,41322,51423,61524,71625,81726,91827} |
||
</pre> |
|||
=={{header|Maxima}}== |
|||
<syntaxhighlight lang="maxima"> |
|||
list1:makelist(i,i,9)$ |
|||
list2:makelist(i,i,10,18)$ |
|||
list3:makelist(i,i,19,27)$ |
|||
block(makelist(sconcat(list1[i],list2[i],list3[i]),i,1,length(list1)),map(eval_string,%%)); |
|||
</syntaxhighlight> |
|||
{{out}}<pre> |
|||
[11019,21120,31221,41322,51423,61524,71625,81726,91827] |
|||
</pre> |
</pre> |
||