Напишите процедуру, которая выводит на экран фразу " я люблю паскаль " заданное в ее параметре количество раз

procedure (var n: integer);   var i: integer;begin   for i := 1 to n do        WriteLn (' Я люблю Паскаль!!!');end;