Главная Статьи Текст и Строки Повтор строки заданное количество раз

Повтор строки заданное количество раз

Оцените материал
(0 голосов)

Повтор строки заданное количество раз

Input - строка для повторения, Rep - количество повторений

function MulStr(Input: string; Rep: integer): string;
var
  i: integer;
begin
  for i := 0 to Rep - 1 do
    result := result + Input;
end;
Пример использования: 
 
s1 := 'Привет';
s := MulStr(s1, 3);

Результат:

s := 'ПриветПриветПривет';
Прочитано 6037 раз

Авторизация



Счетчики