Объяснение:
Форматирование текста - это придание(изменение) документу такого вида , чтобы было легче читать , было более приятным для чтения(шрифт ,абзац и так далее).
Шрифтов бывает несколько :
Шрифты с засечками — имеют небольшие черточки на кончиках символов, применяются в текстах с длинными строками.
Рубленые шрифты — используются для написания заголовков.
Каллиграфические шрифты — художественные, имитирующие рукописный текст, используются для художественного оформления названий.
Так же можно настроить и начертание символов :
1) Нормальное
2) Жирное(полужирное)
3) Курсивное
4) Подчёркнутое
Для абзацев можно настроить:Междустрочный интервал.
Величину отступа (выступа) красной строки .
Размеры отступов слева и справа от абзаца .
Величину интервала между абзацами
выравнивание.
Хватает ? Или подробней ?
Нужно использовать цикл, это довольно просто.
Используем конструкцию:
while true do
begin
end;
Цикл будет выполняться бесконечно.
Если на твой код смотреть, то "while true do begin " вставляешь перед началом программы, а end после "end;", относящегося к case of.
Максимально простой пример:
program ss;
var a : integer;
begin
while true do
begin
writeln('Введите a: ');
readln(a);
case a of
1: writeln('q');
2: writeln('ne q');
end;
end;
end.