Как в TurboPascal повторить оператор несколько раз...

Мне не нравится писать много раз WriteLn
Хочу одним махом написать WriteLn 12 раз, как это сделать?

Может как-то так?:

Program w;
Var
wmr : string;
Begin
for wmr := ' ' to ' '
begin
writeLn (wmr);
end;
End.

Или пробел не считается символом?

Примечание:
Program w;
Var
wmr : string;
Begin
for wmr := ' ' to ' ' do
begin
writeLn (wmr);
end;
End.

Примечание:
Ага, конечно... Если я напишу как ты сказал:

Program AtoB;
Var
i : integer;
Begin
for i := 1 to 12 do
Begin
writeLn (i);
end;
End.

ТО программа мне выведет 12 строк и в начале каждой строки будут цифры от 1 до 12....
А мне надо что бы WriteLn; повторился 12 раз!

Примечание:
Я спрашиваю ответ на вопрос, а не что мне почитать....

Примечание:
Нашелся тоже мне папаша ))) Читайте вопрос внимательно! В нем написано, как сделать то и то..., а не что почитать, что бы сделать то и то.

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.