Repeat a string: Difference between revisions

Content added Content deleted
(Added Befunge Solution)
m (Removed extra whitespace)
Line 191: Line 191:
<lang bbcbasic> PRINT STRING$(5, "ha")</lang>
<lang bbcbasic> PRINT STRING$(5, "ha")</lang>
=={{header|Befunge}}==
=={{header|Befunge}}==
<lang Befunge>
<lang Befunge>v> ">:#,_v
v> ">:#,_v
>29*+00p>~:"0"- #v_v $
>29*+00p>~:"0"- #v_v $
v ^p0p00:-1g00< $ >
v ^p0p00:-1g00< $ >
v p00&p0-1g00+4*65< >00g1-:00p#^_@
v p00&p0-1g00+4*65< >00g1-:00p#^_@</lang>
</lang>
Input sample:
Input sample:
<pre>ha05</pre>
<pre>ha05</pre>