Как вывести 20 одинаковых символов ** экран в pascal

Question

Как вывести 20 одинаковых символов на экран в pascal

Answer 1

Program n_1;
var i:integer;
  begin
    
    for i := 1 to 20 do  
     
          writeln('символ');
    
  end.