Вывести N раз слово "цикл' в строку. Паскаль АВС

очевидно над выполнить это в цикле):var    i, n: integer; begin    write ('Количество раз: ');    readln (n);     for i := 1 to n do        write ('цикл'); readlnend.