Форматирование HTML текста Delphi console - Помощь студентам

QuadroX · 15.12.2009, 21:05

Помогите с задачей. Вот условие:

Написать функцию, которая будет форматировать код программы, представленный в виде строки в html c подсветкой синтаксиса (должны выделяться как минимум идентификаторы и комментарии, желательно также чтобы выделялись числа и строки). Возможный вариант работы функции приведен ниже.
Входная строка:

Код:

{$Apptype Console}
program First;

const
  A=5;

var
  B: Integer;

begin
  Write('Введите B: '); ReadLn(B);
  WriteLn('B*', A, ' = ', B*A);
end.

Результат обработки функцией:

Код:

<html>

<head>
  <title>program First</title>
</head>
<style>
  pre.program {
    font-family: courier new, monospace;
    font-style: normal;
    color: Black;
  }
  span.comment {
    font-style: italic;
    color: DarkGray;
  }
  span.ident {
    font-weight: bold;
    color: Blue;
  }
  span.number {
    color: Magenta;
  }
  span.string {
    color: DarkCyan;
  }
</style>

<body>
  <pre class="program">
<span class="comment">{$Apptype Console}</span>
<span class="ident">program</span> First;

<span class="ident">const</span>
  A=<span class="number">5</span>;

<span class="ident">var</span>
  B: Integer;

<span class="ident">begin</span>
  Write(<span class="string">'Введите B: '</span>); ReadLn(B);
  WriteLn(<span class="string">'B*'</span>, A, <span class="string">' = '</span>, B*A);
<span class="ident">end</span>.
  </pre>
</body>

</html>

В браузере:
{$Apptype Console}
program First;

const
A=5;

var
B: Integer;

begin
Write('Введите B: '); ReadLn(B);
WriteLn('B*', A, ' = ', B*A);
end.

На первый взгляд задание очень сложное

.

50 WMR за выполнение с комментариями.

Greblin · 15.12.2009, 21:42

В сумме R замените на Z, возможно с Вами захотят поговорить на эту тему

QuadroX · 17.12.2009, 15:20

100 WMR. =)

15.12.2009, 21:05	#1
QuadroX 323787261 Пользователь Регистрация: 19.12.2008 Сообщений: 49	Форматирование HTML текста Delphi console Помогите с задачей. Вот условие: Написать функцию, которая будет форматировать код программы, представленный в виде строки в html c подсветкой синтаксиса (должны выделяться как минимум идентификаторы и комментарии, желательно также чтобы выделялись числа и строки). Возможный вариант работы функции приведен ниже. Входная строка: Код: `{$Apptype Console} program First; const A=5; var B: Integer; begin Write('Введите B: '); ReadLn(B); WriteLn('B', A, ' = ', BA); end.` Результат обработки функцией: Код: <html> <head> <title>program First</title> </head> <style> pre.program { font-family: courier new, monospace; font-style: normal; color: Black; } span.comment { font-style: italic; color: DarkGray; } span.ident { font-weight: bold; color: Blue; } span.number { color: Magenta; } span.string { color: DarkCyan; } </style> <body> <pre class="program"> <span class="comment">{$Apptype Console}</span> <span class="ident">program</span> First; <span class="ident">const</span> A=<span class="number">5</span>; <span class="ident">var</span> B: Integer; <span class="ident">begin</span> Write(<span class="string">'Введите B: '</span>); ReadLn(B); WriteLn(<span class="string">'B'</span>, A, <span class="string">' = '</span>, BA); <span class="ident">end</span>. </pre> </body> </html> В браузере: {$Apptype Console} program First; const A=5; var B: Integer; begin Write('Введите B: '); ReadLn(B); WriteLn('B', A, ' = ', BA); end. На первый взгляд задание очень сложное . 50 WMR за выполнение с комментариями. ICQ: 323787261 Email: pschegolevatykh@gmail.com

15.12.2009, 21:42	#2
Greblin Меркантильный кю Участник клуба Регистрация: 02.02.2008 Сообщений: 1,001	В сумме R замените на Z, возможно с Вами захотят поговорить на эту тему Росли вроде умными, выросли дурнями... (c)А.Васильев

17.12.2009, 15:20	#3
QuadroX 323787261 Пользователь Регистрация: 19.12.2008 Сообщений: 49	100 WMR. =) ICQ: 323787261 Email: pschegolevatykh@gmail.com

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Форматирование текста	Sergey2	Общие вопросы Delphi	10	23.09.2009 08:04
Форматирование текста.	Altera	Общие вопросы Delphi	3	11.05.2009 23:29
Форматирование текста	rusif	Помощь студентам	1	17.12.2007 22:28
Форматирование текста в Delphi	Кириллл	Общие вопросы Delphi	3	05.06.2007 14:16