Номер §4.5 № 10

Число повторений известно заранее — десять, поэтому применяем оператор for. Его параметр i последовательно принимает значения от до включительно; следовательно, команда вывода внутри тела выполняется ровно десять раз. writeln после каждого вывода переводит курсор на следующую строку. Имя и фамилию в текстовой константе можно заменить своими.

var i: integer;
begin
  for i :=  to  do
    writeln('Анна Иванова')
end.

Проверка числа строк: . Пример результата — десять отдельных строк с текстом «Анна Иванова».