Данная работа была выполнена на кафедре математических проблем управления. Была проведена работа по изучению принципа работы и структуры системы дистанционного обучения Distance Learning Belarus. Также было проведено знакомство с языком HTML и другими современными интернет технологиями. После было проведено исследование об адаптации лабораторного практикума курса "Разработка трансляторов для языков программирования" для переноса его в систему дистанционного обучения. Затем была проведена переработка всех имеющихся заданий первой и третьей лабораторных работ для их переноса в систему дистанционного обучения, а также тех вариантов заданий, которые были добавлены позже. Так же был осуществлен перенос подготовленных заданий в систему дистанционного обучения. В дальнейшем планируется полный перевод всего лабораторного практикума в систему Distance Learning Belarus. Все это позволит повысить удобство доступа к курсу студентам, освободить преподавателей от рутинной работы по выдаче и проверке заданий и повысить скорость и объективность проверки лабораторных работ.

Использованные источники

1. Кирсанов Д. Веб-дизайн: книга Дмитрия Кирсанова. - Символ-плюс, 2001

2. Коржинский С. Настольная книга Web-мастера: эффективное применение HTML, CSS и Java Script. - Кнорус, 2000

3. Дронов В. Java Script в Веб-дизайне - СПб.: БХВ, 2001

Приложения

Тексты авторских решений лабораторной работы №1.

Вариант №1:

const ms: array [1.6,1.5] of byte= (

{ Ц Б + - =}

{S} (0,2,0,0,0),

{Q} (2,2,0,0,3),

{R} (0,4,0,0,0),

{P} (4,4,5,5,0),

{T} (6,0,0,0,0),

{Z} (6,0,0,0,0));

const ps: array [1.6,1.5] of byte= (

{ Ц Б + - }

{S} (0,1,0,0,0),

{Q} (1,1,0,0,0),

{R} (0,2,0,0,0),

{P} (2,2,4,3,0),

{T} (5,0,0,0,0),

{Z} (5,0,0,0,0));

num: set of char= ['0'. '9'];

sym: set of char= ['A'. 'Z','a'. 'z'];

ee: boolean=true;

var s: string;

i,q,oq,ns: byte;

cons: longint;

p1,p2: string;

sign: shortint;

begin

assign (input,'input. txt');

assign (output,'output. txt');

reset (input);

rewrite (output);

readln (s);

p1: =''; p2: =''; cons: =0;

writeln (s); i: =1; q: =1;

while (i<=byte (s [0])) and ee do

begin

oq: =q;

if s [i] in num then ns: =1 else { }

if s [i] in sym then ns: =2 else { Определение }

if s [i] ='+' then ns: =3 else { номера }

if s [i] ='-' then ns: =4 else { }

if s [i] ='=' then ns: =5 else ns: =0; { символа }

case ps [q,ns] of

1: p1: =p1+s [i];

2: p2: =p2+s [i];

3: sign: =-1;

4: sign: =+1;

5: cons: =cons*10+byte (s [i]) - 48;

end;

q: =ms [q,ns];

if ns=0 then

begin

ee: =false;

writeln (1);

end else

if q=0 then

begin

ee: =false;

writeln (2);

end;

inc (i);

end;

if ee then

if q=6 then writeln ('0'#13#10'p1=',p1,' p2=',p2,' k=',sign*cons)

else writeln (3);

close (input);

close (output);

end.

Тексты авторских решений лабораторной работы №3.

Вариант №1:

const cc=6; {Количество символов в грамматике}

a: array [1. cc,1. cc] of char= ({Отношения между символами}

{Z} {G} {N} {,} {ц} {-}

{Z} (' ',' ',' ','=',' ',' '),

{G} (' ',' ','=',' ','<',' '),

{N} (' ',' ',' ','>',' ',' '),

{,} (' ',' ','>',' ','>',' '),

{ц} (' ',' ',' ','>',' ','='),

{-} (' ',' ','=',' ','<',' '));

sp: byte=0; {Указатель вершины стека}

i: byte=1;

Ok: boolean=true;

LawCount=5; {Количество правил}

Laws: array [1. LawCount,1.2] of string [3] = (

('Z','N'),

('Z','GN'),

('G','Z,'),

('N','ц'),

('N','ц-N'));

var s: string; {Предложение для разбора}

stack: array [1.256] of char; {Стек}

l,p: byte;

Rule: string [10]; {Правило}

Function GetN (c: char): byte; {Узнать номер символа в грамматике}

begin

case c of

'Z': GetN: =1;

'G': GetN: =2;

'N': GetN: =3;

',': GetN: =4;

'-': GetN: =6;

'0'. '9': GetN: =5;

'-': GetN: =255;

else GetN: =0;

end;

end;

procedure Push (c: char); {Поместить символ в стек}

begin

inc (sp);

stack [sp]: =c;

end;

function Cmp (x,y: char): char; {Сравнить два символа}

var i,j: byte;

begin

i: =GetN (x); j: =GetN (y);

if (i=0) or (j=0) then Cmp: =' ' else

if x='-' then Cmp: ='<' else

if y='-' then Cmp: ='>' else

Cmp: =a [i,j];

end;

Function Top: char; {Верхний символ стека}

begin

Top: =Stack [sp];

end;

procedure Error (kind: byte); {Ошибка разбора}

begin

Ok: =false;

if Kind=1 then write ('BAD SYMBOL') else

if Kind=2 then Writeln ('NO RULE') else

if kind=3 then writeln ('MORE SYMBOLS');

end;

function FindLessPos: byte; {Поиск основы}

var p: byte;

begin

p: =sp;

While not (Cmp (Stack [p-1],Stack [p]) ='<') do dec (p);

FindLessPos: =p;

end;

function GetRule (p: byte): String; {Выделить правило из стека с позиции p}

var T: string;

i: byte;

begin

T: ='';

for i: =p to sp do T: =T+Stack [i];

GetRule: =T;

end;

function FindAndExchangeRule (var s: string): boolean; {Заменить строку s по некоторому правилу}

var i: byte;

b: boolean;

begin

for i: =1 to length (s) do if s [i] in ['0'. '9'] then s [i]: ='ц';

i: =1; b: =true;

while (i<=LawCount) and b do

if Laws [i,2] =s then b: =false else inc (i);

b: =not b;

if b then s: =Laws [i,1];

FindAndExchangeRule: =b;

end;

procedure XChangeStack; {Заменить символы в стеке}

begin

Stack [p]: =Rule [1];

Sp: =p;

end;

begin

assign (input,'input. txt');

reset (input);

assign (output,'output. txt');

rewrite (output);

readln (s); {Ввод предложения}

writeln (s);

s: =s+'-';

L: =Length (s);

Push ('-');

if s='-' then writeln ('BLANK LINE') else begin

repeat

Case Cmp (Top,S [i]) of

'<','=': begin

Push (S [i]);

Inc (i);

end;

'>': begin

p: =FindLessPos;

rule: =GetRule (p);

if FindAndExchangeRule (rule) then XchangeStack

else Error (2);

end;

' ': Error (1);

end;

until not Ok or (i>L) or ( (sp=2) and (Stack [2] ='Z') and (i=L));

if Ok then if (sp=2) and (Stack [2] ='Z') then writeln ('OK')

else Error (3);

end;

close (input);

close (output);

end.

Остальные варианты описываются аналогичным способом.

Приложение 2

Исходные тексты условий заданий task. htm:

Работа №1, вариант №1:

<HTML>

<HEAD><TITLE>Синтаксический анализ предложений для регулярной грамматики</TITLE></HEAD>

<BODY>

<CENTER>

<H2>Вариант №1</H2>

<TABLE>

<TR><TD>Исходный файл: </TD><TD>Laba0101. pas или Laba0101. c</TD></TR>

<TR><TD>Входной файл: </TD><TD>input. txt</TD></TR>

<TR><TD>Выходной файл: </TD><TD>output. txt</TD></TR>

</TABLE>

</CENTER>

<H4>Постановка задачи</h4>

<p>

&nbsp; &nbsp; Для заданной регулярной грамматики написать и отладить программу синтаксического анализа предложений порождаемого языка. В ходе выполнения задания:

<OL>

<LI>Разработать подпрограммы, обеспечивающие выделение лексических единиц из входного предложения; </LI>

<LI>Построить в программе матрицы смен состояний и вызова подпрограмм; </LI>

<LI>Обеспечить выдачу сообщений о различных видах синтаксических ошибок во входных предложениях</LI>

</OL></P>

<p>

&nbsp; &nbsp; Обозначение терминальных символов при написании граммматики: <BR>

&nbsp; &nbsp; &nbsp; &nbsp; ц - терминальный символ "цифра" (0,1,2,3,4,5,6,7,8,9); <BR>

&nbsp; &nbsp; &nbsp; &nbsp; б - терминальный символ "буква" ('A'. 'Z','a'. 'z');

</P>

<P>

<TABLE>

<TR><TD WIDTH=150>Z&nbsp; - &gt; &nbsp; Tц&nbsp; |&nbsp; Zц<BR>T&nbsp; - &gt; &nbsp; P+&nbsp; |&nbsp; P-<BR>P&nbsp; - &gt; &nbsp; Rб&nbsp; |&nbsp; Pб&nbsp; |&nbsp; Pц<BR>R&nbsp; - &gt; &nbsp; Q=<BR>Q&nbsp; - &gt; &nbsp; б&nbsp; |&nbsp; Qб&nbsp; |&nbsp; Qц</TD><TD>Грамматика описывает предложения вида: &lt; идентификатор&gt; =&lt; идентификатор&gt; {+|-}&lt; целое&gt;. </TD></TR>

</TABLE>

&nbsp; &nbsp; В ходе разбора предложения должны быть получены две переменные с идентификаторами и значение константы (возможно отрицательное).

</P>

<H4>Ввод: </h4>

<P>

&nbsp; &nbsp; Ввод исходных данных осуществляется из файла input. txt, который содержит строку, содержащую предложение для разбора.

</P>

<H4>Вывод</h4>

<p>

&nbsp; &nbsp; Для строки во входном файле программа должна вывести две или три строки решения согласно следуюшему правилу: <BR>

<UL>

<LI>Если предложение корректное, то программа должна вывести в первую строку исходное выражение, во вторую строку число 0, и в третью строку две переменные с идентификаторами p1 и p2, и значение константы k, разделенные одним пробелом; </LI>

<LI>Если предложение некорректное, то программа должна вывести в первую строку исходное выражение, а во вторую строку вывести номер ошибки (1,2 или 3): <BR>

<TABLE>

<TR><TD><B>1</B></TD><TD>Если в процессе разбора встретился недопустимый символ</TD></TR>

<TR><TD><B>2</B></TD><TD>Если в процессе разбора встретился допустимый символ, но который не может находится на этом месте</TD></TR>

<TR><TD><B>3</B></TD><TD>Если в процессе разбора обнаружилось, что предложение не закончено</TD></TR>

</TABLE></LI>

</UL></P>

<h4>Пример 1</h4>

<p>

Файл ввода input. txt содержит: <BR>

<pre>

a11=b-5

</PRE>

Файл вывода output. txt должен содержать следующие строки: <BR>

<pre>

a11=b-5

0

p1=a11 p2=b k=-5

</PRE>

</P>

<h4>Пример 2</h4>

<p>

Файл ввода input. txt содержит: <BR>

<PRE>

1a=qwe-90

</pre>

Файл вывода output. txt должен содержать следующие строки: <BR>

<PRE>

1a=qwe-90

2

</pre></P>

</BODY>

</HTML>

Работа №3, вариант №1:

<HTML>

<HEAD><TITLE>Синтаксический анализ предложений для грамматик с предшествованием</TITLE></HEAD>

<BODY>

<CENTER>

<H2>Вариант №1</H2>

<TABLE>

<TR><TD>Исходный файл: </TD><TD>Laba0301. pas или Laba0301. c</TD></TR>

<TR><TD>Входной файл: </TD><TD>input. txt</TD></TR>

<TR><TD>Выходной файл: </TD><TD>output. txt</TD></TR>

</TABLE>

</CENTER>

<H4>Постановка задачи</h4>

<p>

&nbsp; &nbsp; Для заданной грамматики с предшествованием определить тип предшествования (простое или операторное), формат предложений, составляющих порождаемый язык. Найти отношения между всеми символами языка (в грамматиках с простым предшествованием) или отношения между терминальными символами (в грамматиках с операторным предшествованием). Разработать на ЭВМ прграмму синтаксического анализа для предложений языка. Обеспечить в программе вывод необходимых диагностических сообщений при обнаружении синтаксических ошибок во входных предложениях</P>

<p>

&nbsp; &nbsp; Обозначение терминальных символов при написании граммматики: <BR>

&nbsp; &nbsp; &nbsp; &nbsp; кн - терминальный символ "цифра" (0,1,2,3,4,5,6,7,8,9); <BR>

&nbsp; &nbsp; &nbsp; &nbsp; ид - терминальный символ "буква" ('a'. 'z');

</P>

<P>

Z&nbsp; - &gt; &nbsp; N&nbsp; |&nbsp; GN<BR>G&nbsp; - &gt; &nbsp; Z,<BR>N&nbsp; - &gt; &nbsp; кн&nbsp; |&nbsp; кн-N<BR>

</P>

<H4>Ввод: </h4>

<P>

&nbsp; &nbsp; Ввод исходных данных осуществляется из файла input. txt, который содержит строку, содержащую предложение для разбора.

</P>

<H4>Вывод</h4>

<p>

&nbsp; &nbsp; Для строки во входном файле программа должна вывести в файл две строки: исходное выражение и строку результата анализа: <BR>

<UL>

<LI>Если предложение корректное, то программа должна вывести строку OK</LI>

<LI>Если исходное предложение является пустой строкой, то программа должна вывести строку BLANK&nbspLINE</LI>

<LI>Если в конце правильного предложения есть лишние символы, то программа должна вывести строку MORE&nbspSYMBOLS</LI>

<LI>Если в процессе анализа не найдётся подходящего правила для свёртки, то программа должна вывести строку NO&nbspRULE</LI>

<LI>Если в процессе анализа встретится недопустимый символ, то программа должна вывести строку BAD&nbspSYMBOL </LI>

</UL></P>

<h4>Пример</h4>

<p>

Файл ввода input. txt содержит: <BR>

Пример №1

<pre>

1,2

</PRE>

Пример №2:

<PRE>

1

</pre></P>

<p>

Файл вывода output. txt для данного входного файла должен содержать следующие строки: <BR>

Пример №1:

<pre>

1,2

OK

</PRE>

Пример №2:

<PRE>

1

NO RULE

</pre></P>

</BODY>

</HTML>

Приложение 3