вобще меня учитель учил это делать так:
Уровень 1.
<body>
<p align=center><font color=blue size=4 face "Tahoma">
<b>Алгоритмы</b>
</font></p>
<p align=center><i>Основные блоки</i></p>
<img align=left src=bloc3.gif
width=200 height=100 hspace=40 vspace=10 alt="Блок Процесс">
<ul type="square">
<li>блок "модификация" (обозначает начало цикла);
</ul>
</body>
----
Уровень 2.
добавить
<ul>
Вставить фрагмент кода из задания.
</ul>
ТЕКСТ
добавляем заголовки таким образом:
<a name="one" >Язык С и С++</a>
ТЕКСТ
<a name="two" >Язык Pascal</a>
ТЕКСТ
<a name="three" >Basic</a>
ТЕКСТ
<a name="four" >Visual Basic</a>
ТЕКСТ
<a name="five" >FORTRAN</a>
ТЕКСТ
<a name="six" >ALGOL</a>
ТЕКСТ
// PascalABC.NET 3.3
begin
var a := ArrRandomInteger(10); a.Sort;
var b := ArrRandomInteger(10); b.Sort;
var c := new integer[20];
writeln('Array 1:'); a.println;
writeln('Array 2:'); b.println;
var i := 0;
var j := 0;
var k := 0;
while (i < 10) and (j < 10) do
begin
if a[i] < b[j] then
begin
c[k] := a[i];
i := i + 1;
end else begin
c[k] := b[j];
j := j + 1;
end;
k := k + 1;
end;
while i < 10 do
begin
c[k] := a[i];
i := i + 1;
k := k + 1;
end;
while j < 10 do
begin
c[k] := b[j];
j := j + 1;
k := k + 1;
end;
writeln('Merged array:'); c.println;
end.