RosettaCodeData/Task/Repeat-a-string/Seed7/repeat-a-string.seed7

$ include "seed7_05.s7i";

const proc: main is func
  begin
    writeln("ha" mult 5);
  end func;