RosettaCodeData/Task/Repeat-a-string/Delphi/repeat-a-string-2.pas

2 lines
32 B
ObjectPascal

Writeln( StringOfChar('a',5) );