Составить программу на языке Pascal, которая печатает ваше имя данное число

var
name : string; // объявляем переменную, в которой будем беречь имя
n,i : integer;  // объявляем переменные кол-во повторений и счетчик цикла

begin
   writeln(Введите ваше имя); // вывод на экран текстовой строчки
   readln(name);  // считываем введенное с клавиатуры имя
   writeln (Введите количество повторений); // вывод на экран текстовой строки
   readln (n); // считываем введенное с клавиатуры количество повторений печати имени
 for i:=1 to n do  // цикл будет выполняться n раз
    begin
      writeln (name); // выводим на экран имя
    end;
end.