Repeat a string: Difference between revisions

→‎{{header|Prolog}}: Repeat strings
(Added an ActionScript version.)
(→‎{{header|Prolog}}: Repeat strings)
Line 346:
=={{header|PowerBASIC}}==
<lang powerbasic>MSGBOX REPEAT$(5, "ha")</lang>
 
=={{header|Prolog}}==
<lang prolog>
%repeat(Str,Num,Res).
repeat(Str,1,Str).
repeat(Str,Num,Res):-
Num1 is Num-1,
repeat(Str,Num1,Res1),
string_concat(Str, Res1, Res).
</lang>
 
=={{header|Pure}}==
418

edits